Forum: Object-Pascal / Delphi-Language
Delphi
by problemstoffe,
3. Mai 2008
Kommt das so hin? Oder immernoch völlig falsch?
i := 2;
m1: if i>100 then goto m2
zahl := i;
p := 2;
goto m1;
M2: If not p <= 100 Then Goto M3;
v := 2;
Forum: Object-Pascal / Delphi-Language
Delphi
by problemstoffe,
3. Mai 2008
Eine Idee wie ich das mache? Oder kennst du eine Homepage wo eine Übersetzungsschablone gelistet ist?
Das der Rest nicht stimmt kann gut sein :pale:
Forum: Object-Pascal / Delphi-Language
Delphi
by problemstoffe,
3. Mai 2008
Muss in Delphi ein Quellcode für das Sieb des E. entwickeln und das ganze dann in ein R-Pascal umschreiben. Das habe ich jetzt mal auf die Beine gestellt. Stimmt das soweit?
for i := 2 to 100 do zahl := i;
p := 2;
while p <= 100 do
begin
v := 2;
while v*p <= 100 do
begin