Написать программу на языке паскаль, которая принимает на вход целое число и выводит текст - число натуральное, или текст - число не является натуральным в зависимости от значения числа.

Katysha1111111 Katysha1111111    1   07.10.2019 22:01    0

Ответы
yuliyagrigoren3 yuliyagrigoren3  10.10.2020 02:47

var x:integer;

BEGIN

readln(x);

if (x>0) then

writeln('Число натуральное.') else

writeln('Число не является натуральным.');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика