Очееень нужно ребят)только понятно пишите)
вывести на экран среди трехзначных чисел все, которые делятся на 13

1

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

2014-03-11T19:18:58+04:00
Var i:integer;
begin
for i:=100 to 999 do
if i mod 13=0 then
writeln(i);
end.