• вычислить в pascal abc: y=1/(2-x) с оператором условного перехода. очень срочно

Ответы 2

  • var y,x:real;

    begin

    readln(x,y);

    if 1=1 then y:=1/(2-x);

    writeln(y);

    end.

  • Program Program1;varx:real;beginwrite('Введите значение x: ');readln(x);if 2-x=0 then writeln('Деление на ноль.')elsewriteln('y=',1/(2-x));end.

    • Автор:

      caracasey
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years