Valeria12351778
18.05.2023 22:59

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Леля24579
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.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота