Hunrad
5 год назад
Пожалуйста посчитайте,пожалуйста Запишите на ЯП Паскаль и обратно
ОТВЕТЫ
Игнат
Oct 24, 2020
а var x,y,s: real;
Begin
s:= x*y;
End.
б Var a,b,x,s: real;
Begin
s:=sqrt(abs(sqr(cos(a+b*sqr(x)))));
End.
в Var x,y,b: integer;
Begin
x:=15;
y:=21;
b:=15+21 div 2;
End.
Begin
s:= x*y;
End.
б Var a,b,x,s: real;
Begin
s:=sqrt(abs(sqr(cos(a+b*sqr(x)))));
End.
в Var x,y,b: integer;
Begin
x:=15;
y:=21;
b:=15+21 div 2;
End.
542
Смежные вопросы:
