Предмет: Информатика, автор: MaryanaDzakuraeva

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

Ответы

Автор ответа: Аноним
0
var x:integer;beginreadln (x);if (x>0) then writeln ('число не отрицательное');end.
Интересные вопросы
Предмет: Қазақ тiлi, автор: saiasatzharkyn
Предмет: Алгебра, автор: talgatova01
Предмет: Математика, автор: vadimpolishchu
Предмет: Математика, автор: tanushkakirillo