Вычислить значение выражения - Turbo Pascal (33545)

Формулировка задачи:

i=a*sin(x+y)- b*cos(x+y)/sqrt(4*x*y), при значениях a=10;b=6,3;y=0,35; x принимает значения 0,6; 0,51; 0,42. Ничего не могу сделать, решил написать вам.

Код к задаче: «Вычислить значение выражения - Turbo Pascal (33545)»

textual
Program abc;
var a,b,y,x,i :real;
begin
a:=10;
y:=0.35;
x:=0.6;
i:=a*sin(x+y)-b*cos(x+y)/sqrt(4*x*y);
Write('i = ',i :3:1);
ReadLn;
end.

7   голосов, оценка 3.857 из 5


СОХРАНИТЬ ССЫЛКУ