Определите, является ли заданное число A нечетным числом. (Написать программу) на русском

Question

Юдифь

2 октября, 11:56

+5

Ответы (2)

Знаете ответ?

Вацлава · Answer 1

Введите число А

если число А делится нацело на 2, то число А - четное, иначе число А - нечетное

Мальвина · Answer 2

Var a:integer;

begin

writeln ('Введите число А') ;

readln (a) ;

if a mod 2=0 then

writeln ('YES')

else

writeln ('NO') ;

end.