Задать вопрос Регистрация
Помочь другим

  • даны 4 вещественных числа,выведите на экран те из них,значение которых отрицательны.срочно нужно!!!

Ответы 1

  • var

      a, b, c, d : real;

    begin

      read (a, b, c, d);

      if a < 0 then writeln (a);

      if b < 0 then writeln (b);

      if c < 0 then writeln (c);

      if d < 0 then writeln (d);

    end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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