Вычислить значение выражения - 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)»
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
СОХРАНИТЬ ССЫЛКУ