Ответ(ы) на вопрос:
Гость8-ой:
var N,a,y,z:real;
begin
Readln(a,y,z);
N:=(a+51-sqrt(y-49))/(5-z);
If (y<49) or (z=5) then
begin
If y<49 then
Writeln('Число y < 49 Число в корне не может быть меньше 0');
If z=5 then
Writeln('Число z=5 На 0 делить нельзя');
end
else
Writeln(N);
end.
Не нашли ответ?
Похожие вопросы