2008-05-07から1日間の記事一覧
大した情報を持っていない・・・。 とりあえずFizzBuzz書き比べでも乗せてみる。 Delphi uses SysUtils; procedure fizzbuzz(n : Integer); begin if (n mod 15 = 0) then Writeln('FizzBuzz') else if (n mod 5 = 0) then Writeln('Buzz') else if (n mod 3…
大した情報を持っていない・・・。 とりあえずFizzBuzz書き比べでも乗せてみる。 Delphi uses SysUtils; procedure fizzbuzz(n : Integer); begin if (n mod 15 = 0) then Writeln('FizzBuzz') else if (n mod 5 = 0) then Writeln('Buzz') else if (n mod 3…