Пример выполнения работы. Задание: Вычислить на ЭВМ значения y и p, используя расчетные формулы

Задание: Вычислить на ЭВМ значения y и p, используя расчетные формулы:

y= a tg³ x² + z²/Ö(a² + x²); p = ln (a+ x²) + sin²(z/a)

при значениях a = 0,59; z= -4,8; x = 2,1.

Program Prim1;

Var

a, x, z, C, y, p: real;

begin

writeln(’Введите a, z, x’);

read(a, z, x,);

c:= sin(x*x)/cos(X*X);

y:=a*EXP(3*ln(c))+SQR(Z)*sqrt(a*a+x*x));

p:=ln(a+x*x) + sqr(sin(z/a));

writeln(‘y=’, y:8:3, ‘ p=’, p:8:3)

end.

Контрольные вопросы

1. Как выполняются действия в линейных программах?

2. Для чего служит оператор присваивания?

3. Какой оператор служит для ввода данных?

4. Какой оператор служит для вывода данных?

5. Как записываются арифметические выражения в Паскале?

Программирование алгоритмов разветвляющейся