Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var x,y,z:real;
Writeln('Введите через пробел x,y,z: ');
Read(x,y,z);
var a:=y+x/(y*y+Abs(x*x/(y*y+x*x/3)));
var b:=1+Sqr(Tan(z/(2*(x+y))));
Writeln('a=',a,', b=',b)
end.
Не нашли ответ?
Похожие вопросы