: FizzBuzz cr 101 1 do i 15 mod 0= if .\" FizzBuzz\" else i 5 mod 0= if .\" Fizz\" else i 3 mod 0= if .\" Buzz\" else i . then then then cr loop ;




May The FORTH be with You.