fslasht さんの日記で見かけたので、高級言語でやってもつまらないですが、一応、ヲレ言語の詞葉でやってみましたｗ

ソースとコンパイラはここ

Win32 コマンドライン上から、cotoco /nologo /X fizzbuzz.cos で実行できます。
これであってるのかな？
（簡単な問題ほど、単純ミスが怖い…ｗ）

一応、ソースは、ヘッダ不要の単体で、できるだけ手短に書いてます。

DeclareType File
Constant modeWrite := 0004H

Function main()

File cout
cout.Open( "", modeWrite )

Array aText := { String, "Fizz", "Buzz", "FizzBuzz" }

For i := 1 To 100
aText[0] := i
cout += aText[(!(i % 3) & 1) | (!(i % 5) & 2)]
Next

EndFunc