Помогите пожалуйста людии Информатика 7 клас Напишіть програму, в якій задається ціле число і виводиться відповідь «так», якщо воно парне. І відповідь «ні», якщо це не так.
program task;
var
n: real;
begin
write('Введіть число ');
readln(n);
if n mod 2=0 then write('Парне');
else write('Не парне');
readln;
end.