определить является ли число N чётным двузначным числом в паскале

Question

Информатика

Увар

27 мая, 14:33

определить является ли число N чётным двузначным числом в паскале

+1

Ответы (1)

Знаете ответ на вопрос?

Каллисфения · Answer 1

Program is_ev_2d;

var n: integer;

begin

write ('Введите число: ') ;

readln (n) ;

if (n mod 2 = 0) and (n > 9) and (n < 100) then

writeln (n, ' чётное двузначное')

else

writeln (n, ' не чётное двузначное')

end.