Paskal выдаёт ошибку, испрвить: : написать программу, которая проверяет, является ли четным введенное пользователем целое число. program cisla; var a: integer; begin writeln('введите число, '); readln(a); if a mod 2=0 then writeln('число четное'); else writeln('число нечетное'); readln end.