Question

Вывести на экран все числа от 10 до 2030 которые заканчиваются на 11. Паскаль

Answer 1

var
i: integer;
begin
for i:=10 to 2030 do
if ((i mod 10) = 1) and (((i div 10) mod 10)=1) then write (i, '; ');
end.