Дано натуральное число N определить четное или не четное? PascalABC​

lushkina73 lushkina73    3   22.03.2021 10:19    0

Ответы
SolekProAwp SolekProAwp  22.03.2021 10:20

var

 N:integer;

 begin

   read(N);

    if N>0 then

   if N mod 2=0 then write('Четное')

else write('Не четное')

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

 end.

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