HELP ME, PLEASE 1) Составьте программу, проверяющую, является ли введенное число четным или нечетным.
Answers & Comments
A1darvar a: integer; begin write('Введите число: '); read(a); if a mod 2 = 0 then writeln('Число ', a, ' четное') else writeln('Число ', a, ' нечетное') end.
Answers & Comments
begin
write('Введите число: ');
read(a);
if a mod 2 = 0 then writeln('Число ', a, ' четное')
else writeln('Число ', a, ' нечетное')
end.