Вычислить в pascal abc: y=1/(2-x) с оператором условного перехода. очень срочно
var y,x:real;
begin
readln(x,y);
if 1=1 then y:=1/(2-x);
writeln(y);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
var y,x:real;
begin
readln(x,y);
if 1=1 then y:=1/(2-x);
writeln(y);
end.