Разработайте программу в паскаль вычисления сложного выражения: z=(x^2+y^2)/(2-sqrt(x+y)). Программа должна предлагать пользователю ввести величину переменных x и y и на основании этой информации производить расчет z.

Var x, y, z: double;
begin
   writeln(Input x);
   readln(x);
   writeln(Input y);
   readln(y);
   if (x + y >= 0) and (x + y <> 4) then {необходимо для корректности}
   begin
      z := (x * x + y * y) / (2 - sqrt(x + y));
      writeln(z);
   end
   else
      writeln(Incorrect input);
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку