Ответы
Ответ дал:
0
Var a,b,x,y:real;
Begin
Writeln('vvedi a,b ');
Readln(a,b);
X:=b*sin(2*a);
Y:=sin(x)-x;
Writeln('x=',x,'y=',y);
Readln;
End.
Begin
Writeln('vvedi a,b ');
Readln(a,b);
X:=b*sin(2*a);
Y:=sin(x)-x;
Writeln('x=',x,'y=',y);
Readln;
End.
Похожие вопросы
2 года назад
2 года назад
9 лет назад
9 лет назад
9 лет назад