Составить приложение на языке Pascal.
Вариант задания выбирается по последней цифре зачетной книжке.
По заданным расчетным формулам и наборам исходных данных,
указанных в таблице, вычислить на ПК значения соответствующих
переменных. На печать вывести значения вводимых исходных данных и
результаты расчетов, сопровождая их вывод именами выводимых
переменных.

 

 

var

a,b,s,t,y:real;

begin

a:=-0.5;

b:=1.7;

t:=0.44;

y:=exp(-b*t)*sin(a*t+b)-sqrt(abs(b*t-a));

s:=b*sin(a*t*t*cos(a*t))-1;

writeln('y=',y:8:3);

writeln('s=',s:8:3);

end.