Составить программу которая определяет какая из цифр: 0, чётная, нечетная, больше 10, нажата на клавиатуре( на паскале)

Question

Составить программу которая определяет какая из цифр: 0, чётная, нечетная, больше 10, нажата на клавиатуре( на паскале)

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b:integer; begin writeln('Введите целое число: '); readln(a); b:= a mod 2; if b>0 then writeln('Число нечётное') else writeln('Число чётное'); if a>=10 then writeln('Число >=10') else writeln('Число =<10'); end.