:For(I,0,100,5
:Disp I
:End