ЕН
Екатерина Никишина
Помогите пожалуйста решить задачку в паскале.
Дано n-значное число нужно определить его четность нечетность, и вывести результат на экран: "число четное" или "число нечетное"
Дано n-значное число нужно определить его четность нечетность, и вывести результат на экран: "число четное" или "число нечетное"
проверь остаток от деления на 2
odd(a) определяет нечетное число
if odd(n) then writeln ('нечетное') else writeln('четное');
readln (a)
if odd(a) then writeln('ne 4et')
else writeln('4et');
readln;
const s:array[0..1]of string=('чотное','не очень');
var a:integer;
begin
readln(a);
wrtiteln(s [ a and 1 ] );
end;