Теория прикладной информатики
Вычисление значения функции согласно определенных переменных и с заданным шагом измерения аргумента. Описание листинга программы и скрин результата вычислений. Нахождение количества положительных N чисел посредством использования оператора цикла For.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | контрольная работа |
| Язык | русский |
| Дата добавления | 09.02.2018 |
| Размер файла | 444,3 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Размещено на http://www.allbest.ru/
Министерство Образования И НАУКИ Российской Федерации
РУБЦОВСКИЙ ИНДУСТРИАЛЬНЫЙ ИНСТИТУТ (филиал)
ФГБОУ ВО «Алтайский государственный технический университет им. И.И. Ползунова»
КОНТРОЛЬНАЯ РАБОТА
по дисциплине: «Информатика»
Выполнила:
студентка гр. ЭФК-71з
Редько О.В.
Проверила:
к.т.н., доцент кафедры «Прикладная математика»
Шульман И.Б.
Рубцовск 2018
Задание 1
Вычислить значение функции:
z=
Решение:
Programzadacha_1;
Varx,y,z: real;
Begin
Writeln ('Введите значения х и у');
Read (x,y);
ifsqr(x)+sqr(y)=1 thenwriteln ('Значение функции в данной точке неизвестно')
else z:=((x-sqr(y))/ln(sqr(x)+sqr(y))+2);
Writeln ('Значение функции z=', z:1:2);
End.
Задание 2
Даны три положительных числа a, b,c. Проверить, могут ли они быть сторонами прямоугольного треугольника.
Решение:
Program zadacha_2;
Vara,b,c:real;
Begin
Writeln('Введитекатетыaиb: ');
Readln(a,b);
Writeln('Введитегипотенузу c: ');
Readln(c);
ifsqr(c)=sqr(a)+sqr(b) then
writeln('a, b и c являются сторонами прямоугольного треугольника')
elsewriteln ('a, b и c не являются сторонами прямоугольного треугольника');
End.
Задание 3
Вычислить значение функции:
, где k=2.7.
Решение:
Program zadacha_3;
Vark,x:real;
Begin
k:=2.7;
Write('Введите значение х=');
Readln(x);
if x<-pi/2 then x:=(2*sqr(sin(x/2)))/x;
if x>=-pi/2 then x:=exp(sqr(x))+cos(2*k*x);
writeln ('Значение функции f(x)=',x:6:2);
End.
Задание 4
Используя оператор цикла For, найти количество положительных чисел Nчисел.
Решение:
Program zadacha_4;
Var A: array [1..100] of integer;
x,i,n: integer;
Begin
Writeln('ВведитеколичествочиселN: ');
Readln(n);
Writeln('Введитечисла: ');
for i:= 1 to n do readln(A[i]);
writeln('Выввели: ');
for i:= 1 to n do write(A[i]:4);
writeln;
for i:= 1 to n do if A[i] > -1 then x:= x+1;
writeln('Среди них положительных: ',x);
Еnd.
Задание 5
Вычислить значение функции y = 2*на отрезке с заданным шагом измерения аргумента dx=0.35. Результаты вычисления оформить в виде таблицы. функция переменная листинг программа
Решение:
Programzadacha_5;
Varx,y:real;
Begin
x:=-5;
Writeln ('---------------');
Writeln ('| x | ',' y |');
Writeln ('---------------');
while x<=2 do begin
y:=2*sqrt(abs(x));
Writeln ('|' ,x:6:2,'|':2,y:6:2,'|');
x:=x+0.35;
end;
End.
Размещено на Allbest.ru
Подобные документы
Особенности применения компьютерных программ Pascal, Excel, MathCAD и Delphi для вычисления значения функции y(x) с заданным промежутком и шагом. Виды результатов вычислений, их сравнение и вывод. Изображение блок-схемы алгоритма решения задания.
контрольная работа [760,0 K], добавлен 08.03.2011Вычисление значения функции с помощью программирования. Рабочий набор исходных данных. Таблица идентификаторов, текст программы, контрольный расчет. Подключение модуля, объявление константы и переменных вещественного типа. Шаг изменения аргумента.
контрольная работа [118,4 K], добавлен 28.09.2012Источники и виды погрешностей результата вычислительной задачи: неустранимые, вычислительные и неточность метода. Вычисление абсолютной и относительной ошибки. Правила записи приближенных чисел, их сумма и разность. Просчет функции нескольких переменных.
контрольная работа [34,5 K], добавлен 28.02.2011Методика разработки и листинг программы для вычисления значений функции F(x) на отрезке [а, Ь] с заданным шагом. Вычисление значения выражения по формуле. Расчет параметров равностороннего треугольника. Порядок формирования квадратной матрицы порядка.
контрольная работа [425,1 K], добавлен 10.03.2014Характеристика программы на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит результаты на экран. Описание переменных в программе, ее блок-схема и алгоритм работы. Листинг программы. Описание входных данных и результат вычислений.
курсовая работа [721,4 K], добавлен 10.11.2010История развития программы Паскаль. Типы переменных. Значение переменной для прекращения вычислений. Использование операторов цикла, процедур и функций. Ввод значений М-конца цикла и произведение вычислений по расчётной формуле. Форматированный вывод.
контрольная работа [45,9 K], добавлен 13.07.2013Написание программы для вычисления функции f(x), изображенной на графике, используя оператор if. Построение графика функции. Составление программы, вычисляющей сумму 101 из последовательно расположенных нечетных чисел. Нахождение корней системы уравнений.
контрольная работа [694,4 K], добавлен 07.08.2013Общая характеристика основ дисциплины "Теория чисел". Интерфейс, листинг и оценка положительных и отрицательных качеств программы-калькулятора CalcKurs, а также описание ее основных процедур – DelOstatok, Factor, NodNok, SuperGorner, Express и AntiExp.
курсовая работа [1,9 M], добавлен 28.05.2010Изучение циклических операторов: оператора цикла, управляемого счетчиком, оператора цикла с предусловием и постусловием. Минимизированные функции, текст программы. Алгоритм работы приложения по нахождению функции с помощью операторов break и continue.
лабораторная работа [474,2 K], добавлен 23.11.2014Составление производственного плана трех видов изделий при определенных возможностях машин. Написание алгоритма решения задачи симплексным методом: описание переменных, констант, нахождение разрешающего элемента, вычисление таблицы методом прямоугольника.
методичка [237,2 K], добавлен 25.09.2010
