• Ввести число X. Если X > 0, то вывести на печать сообщение "число не отрицательное". Для отрицательного числа ввод числа повторить. (ПАСКАЛЬ).С ОБЪЯСНЕНИЕМ

Ответы 1

  • var x:integer;beginreadln (x);if (x>0) then writeln ('число не отрицательное');end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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