Напишите программу вычесления выражения 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
Не нашли ответ?
Похожие вопросы