Лабораторная работа №1
“Программирование линейных алгоритмов”
Вариант – 18
(из книги: “Алгоритмизация и программирование на
Турбо Паскале” В.C. Новичков)
Задание:
Составить алгоритм и программу вычисления значения функции: y=1/x*sin^8(1/x), где х=2,84+a^2
Блок схема алгоритма:
Текст программы:
Program Lab1;
Var a,x,y : real;
Begin
Writeln(‘a=’);
Readln(a);
X:=2.84+a*a;
Y:=1/x*sqr(sqr(sqr(sin(1/x)));
Writeln(‘y=’,y);
End.
Контрольный расчёт:
A=0, y=7.0476149680E-5
|
Главная
Каталог файлов
