Помогите, прошу.Паскаль. Определите, является ли заданное число А четным трехзначным числом.

Question

Помогите, прошу.Паскаль. Определите, является ли заданное число А четным трехзначным числом.

Экономика

Гость

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

Accepted Answer

var a: integer; begin write('Введите a: '); read(a); if (a mod 2 = 0) and (a>99) and (a<1000) then writeln('Является.') else writeln('Не является.'); end.