"Überprüfung ob Primzahl" kann nicht stimmen.
* die Repeat-Schleife wird
nur bei 0 verlassen
* das was in der Schleife ist, ist komplett sinnlos, weil niemals damit etwas gemacht wird
* "Zahl" kann sowieso niemals 0 sein
und bezüglich "Primzahlzwilling"
* man nehme das vorherige Ergebnis "IsPrime"
* und wenn ja, dann Zahl+2 und Zahl-2 prüfen, ob einwas davon auch eine Primzahl ist
Delphi-Quellcode:
for zahl := 1 to 50 do
begin
...
if zahl > 0 then
begin
Und überleg auch mal, ob diese Prüfung irgendeinen Sinn haben kann.
Oder andersrum, schau dir an, was die Ausgabe im ersten Post mit deiner Schleife
nicht gemeinsam hat.
Ein Therapeut entspricht 1024 Gigapeut.