Teiler

[Meflin]

Ach ja: Ich kenn jetz deine Aufgabenstellung nicht, aber i.d.R. lässt man bei sowas die trivialen Teiler (1 und o, weil dadurch ist ja eh jede Zahl teilbar), weg. Somit wäre es dann

Delphi-Quellcode:

for i := 2 to o - 1 do begin
...