Qbasic Program To Display natural numbers from 1 to 100

(using FOR-NEXT)
CLS
FOR I = 1 TO 100
PRINT I;
NEXT I
END

(using WHILE - WEND)
CLS
I = 1
WHILE I <=100
PRINT I;
I=I+1
WEND
END