Question

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

Answer 1

var i:integer;
begin
for i:=100 to 999 do
if i mod 13=0 then
writeln(i);
end.

Answer 2

большое спасибо)