лабораторная работа / вар19 / Лабораторная №1
.docСОДЕРЖАНИЕ
1 Цель работы. Вариант. Задание 3
2 Графическая схема алгоритма 4
3 Программа на языке Turbo Pascal 5
4 Результаты выполненной работы 6
1 ЦЕЛЬ РАБОТЫ. ВАРИАНТ
Цель работы: знакомство с основами алгоритмизации и программирования линейных вычислительных процессов на языке Turbo Pascal/
Вариант №19
Задание.
Вычислить на ЭВМ значения переменных, указанных в таблице, по заданным расчетным формулам и наборам исходных данных. На печать вывести значения вводимых исходных данных и результаты вычислений, сопровождая вывод наименованиями выводимых переменных.
a=0.72
c=0.823
d=1.23
2 ГРАФИЧЕСКАЯ СХЕМА АЛГОРИТМА
3 ПРОГРАММА НА ЯЗЫКЕ Turbo Pascal
Program lab1_Vika;
Var
Q, a, x, c, r, b, d:real;
Begin
Writeln (‘Введите А, С, D’);
Read(a, c, d);
Q:=(exp(3*ln(a))*x+cos(c-pi/4))/(1/8+exp(5*ln(d)));
r:=-exp(b*a)*(a+SQRT(abs(c-d)))/(a-SQRT(c+d));
Writeln (‘Q=’, Q:8:3, ‘r=’, r:8:3);
End.
4 РЕЗУЛЬТАТЫ ВЫПОЛНЕННОЙ РАБОТЫ
Вводим
a=0.72
c=0.823
d=1.23
Получаем
Q=0.340
R=1.905