На языке программирования заранее ) 1) составьте программу,проверяющую,верно ли утверждениечто введенное вами целое число является четным. 2)напишите программу,которая бы запрашивала целое число и распечатывала любое его значение,кроме 13. если заданное число равно 13,вместо него печатается число 77. ; (( если незнаете как решать не занимайте место для ответа
n:integer;
begin
Write('Введите четное число: '); Readln(n);
if (n mod 2)=0 then Writeln('Верно!')
else Writeln('Неверно!')
end.
var
n:integer;
begin
Write('Введите любое целое: '); Readln(n);
if n<>13 then Writeln(n) else Writeln(77)
end.