moin leute
ich hab versucht die summe der von der tastatur stammenden zahl zu berechnen.
Delphi-Quellcode:
var summe,N, zahl:integer;
begin
summe:=0;
zahl:=0;
readln(N);
repeat
zahl:= zahl+1;
summe:= summe+zahl;
until
zahl>=N;
writeln(N);
readln;
end.
ich bekomme aber leider kein sinnfolles ergebnis.
könnt ihr mir bitte helfen?
Je weniger einer weiß, desto eher glaubt er jeden Scheiß.