program delitele;
{ Program očekává na vstupu na jedné řádce 3 čísla (která se vejdou do inetegeru).
První je dolní mezi, druhé hodní mez a poslední je dělitel.
Můžeme předpokládat, že dolní mez je <= horní mez.
Program dále vypíše všechna celá čísla z intervalu <dolní mez, horní mez>, která jsou dělitelná dělitelem.}
var a,b,d,i : integer; { Po řadě: dolní mez, horní mez, dělitel, iterační proměnná ve for-cyklu.}
begin
readln(a,b,d); {Načteme vstup.}
for i:=a to b do {Procházíme čísla z intervalu <dolní mez, horní mez>.}
if (i mod d = 0) then
write(i,' '); {Vypisujeme čísla dělitelná dělitelem d.}
end.
Kdo byste našel v nějakém z těchto programů chybu, dejte mi to vědět - můžete tak získat bonusové body (1 chyba ≈ 5 bodů). ;)