Напишите программу вычесления выражения s=(x-y^2)/(x^2+y^2)+xy

Напишите программу вычесления выражения s=(x-y^2)/(x^2+y^2)+xy
Гость
Ответ(ы) на вопрос:
Гость
var  s, x, y: real; begin  write('введите х у:');  read(x, y);  s := (x - sqr(y)) / (sqr(x) + sqr(y)) + x * y;  s := Trunc(s);  writeln('s:', s);end
Не нашли ответ?
Ответить на вопрос
Похожие вопросы