var i: integer;
begin
for i:=100 to 200 do
if i mod 3 = 0 then writeln(i);
end.
Прямоугольник:)))))..........