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

Question

Информатика

Адриан

8 марта, 03:20

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

+5

Ответы (1)

Знаете ответ?

Борюля · Answer 1

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