Программирование в среде Турбо Паскаль. Закутский С.Н - 15 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

15
ReadLn(s, t);
Ar_Ln:=s-a/t;
{Следующие два оператора WriteLn выводят на экран значения
аргумента логарифмической функции и предупреждение о возможности
аврийного прерывания работы программы из-за несоответствия значения
аргумента характеру функции}
WriteLn('аргумент функции логарифма ArLn = ', Ar_Ln);
WriteLn('если Ar_Ln< = 0, произойдет аварийная остановка;’);
WriteLn(‘в этом случае следует ввод повторить заново');
{Далее вычисляется значение функции; в операторе присваивания
использованы библиотечные функции для вычисления логарифма,
экспоненты, косинуса и синуса}
F:=Ln(Ar_Ln)+Exp(-pi*t)*(Cos(pi*s)-Sin(pi*s))/(s*s+t*t);
WriteLn('s = ', s:5:2, ' t = ', t:5:2, ' F(s, t) = ', F:6:2)
END.
ЗАДАНИЯ
Вариант 1
Вычислить значения переменных a и b, пользуясь формулами, приве-
денными ниже. Значения x , y, z задавать при вводе. На экран вывести зна -
чения a , b, x, y, z.
3
(2)
222
2
1
1
;arctg.
1
1
22
22
x
xy
z
abxe
xy
y
x
−+




−−
+

==+



++
++




Вариант 2
Вычислить значения переменных a и b, пользуясь формулами, приве-
денными ниже. Значения x , y, z задавать при вводе. На экран вывести зна -
чения a , b, x, y, z.
()()
23
2
--
31
;1.
23
tg
1
1
y
yxyx
e
abyx
xyz
yx
+−
==+−++
−
+
+−
Вариант 3
Вычислить значения переменных a и b, пользуясь формулами, приве-
денными ниже. Значения x , y, z задавать при вводе. На экран вывести зна -
чения a , b, x, y, z.

Страницы