TetaTricks/code/Basic/bywater-1.bas

5 lines
71 B
QBasic

10 CLEAR
20 FOR I=1 TO 10
30 PRINT I, I*I
40 NEXT I