Prgm
Local i
For i,1,20,1 
If mod(i,3) = 0  and mod(i,5) = 0 Then
Disp "FizzBuzz" 
ElseIf mod(i,3) = 0 Then
Disp "Fizz"
ElseIf mod(i,5) = 0 Then
Disp "Buzz"
Else
Disp i
EndIf 
EndFor 
EndPrgm