Ввести число X. Если X > 0, то вывести на печать сообщение "число не отрицательное". Для отрицательного числа ввод числа повторить. (ПАСКАЛЬ).С ОБЪЯСНЕНИЕМ
Ответы
Ответ дал:
0
var x:integer;beginreadln (x);if (x>0) then writeln ('число не отрицательное');end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад