WAP to display all even numbers from 2 to 50

(using FOR - NEXT)
CLS
FOR I = 2 TO 50 STEP 2
PRNT I ;
NEXT I
END

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