Zitat von
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
...
der größte teiler wäre dann o/2 ... also muss die schleife nur bis zur hälfte laufen