Question

Дано 2х значное число определить четность или не четность первого числа

Answer 1

var

n : integer;

begin

readln(n);

if n mod 2 = 0 then

writeln('Четное')

else

writeln('Нечетное')

end.

Answer 2

Ответ:

var

n : integer;

begin

readln(n);

if n mod 2 = 0 then

Объяснение: