разработайте программу в паскаль, которая запрашивает у пользователя любое натуральное (целое положительное) число и проверяет его на четность/нечетность (используйте либо mod либо odd), результат выводится на экран

var n:integer;beginwrite('n='); readln(n);if n mod 2 = 0  then writeln('Число четное')  else writeln('Число нечетное');end.Пример:n=15Число нечетное