WAP to print the series: 5,10,15,........50

(using FOR - NEXT)
CLS
FOR I = 5 TO 50 STEP 5
PRINT I;
NEXT I
END

(using WHILE - WEND)
CLS
I = 5
WHILE I <= 50
PRINT I;
I = I + 5
WEND
END