Дано число определить является ли оно четным трехзначным?(** языке программирования)

Question

Дано число определить является ли оно четным трехзначным?(На языке программирования)

Answer 1

Program n1;
var a: integer;
begin
readln(a);
if (a>99) and (a<1000) and (a mod 2=0)<br>then write('является') else
write('не является');
end.