Составте программу вычисления вывода всех трёхзначных чисел,которые кратны 3.

1

Ответы и объяснения

2011-12-06T22:17:50+04:00

program ml;
uses crt;
var i:integer;
begin
clrscr;
for i:=100 to 999 do
if i mod 3 = 0 then writeln(i);
readkey;
end.