Написвть программу которая будет запрашивать у пользователя целые числа до тех пор пока...

Question

Написвть программу которая будет запрашивать у пользователя целые числа до тех пор пока не будит введено чётное. Паскаль

Answer 1

Uses crt;
var a: Integer;
begin
while (a mod 2) <> 0 do
readln(a);
end.