if x mod 2 = 0 then
writeln('Это четное число')
else writeln('Это нечетное число');

Объясните первую строчку? ​

Если при делении числа икс на 2 остаток будет равен нулю, значит выводится на экран "Это чётное число" иначе выводится на экран "Это нечётное число"

операция "х mod у" делит число х на у и узнает остаток

есть ещё обратная ей операция

"х div y" она делит число х на у и узнает сколько поделилось нацело (целая часть)

пример:

23 div 2 = 11 , так как 11*2=22(целая часть)

23 mod 2 = 1 аналогично

mod - работает с целыми числами и возвращает остаток от деления числа на 2. Любое четное число при делении на 2 имеет нулевой остаток, а любое нечётное имеет остаток, не равный нулю. Поэтому данная программа определяет четность числа. Возможен альтернативный вариант написания данной программы. Вот код:

if odd(x) then writeln('Это нечётное число')

else writeln('Это чётное число');