WAP to display 100,90,80,.......,10

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

(using WHILE - WEND)
CLS
I = 100
WHILE I >= 10
PRINT I;
I = I - 10
WEND
END