Question

Найти все четырехзначные числа, кратные 11. Через for

Answer 1

11,22,33,44,55,66,77,88,99.

Answer 2

var

Answer 3

x:integer;

Answer 4

FOR много где есть, но, думаю, надо на Паскале:)

var i: integer;
begin
     for i := 1000 to 9999 do
         if (i mod 11 = 0) then writeln(i);
end.