Zum #BASIC-Jubiläum eine FOR-NEXT-Schleife …
10:X=0:N=100
20:FOR I=1 TO N:X=X+I:NEXT I
30:PRINT X
(5050 nach 3 Sek.)