スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

FizzBuzz問題の解答例 MS-DOSバッチファイル編

MS-DOSバッチファイルによるFizzBuzz問題の解答例。

解答例

条件分岐とループによるプログラム:

@echo off

:: fizzbuzz.bat
:: MS-DOSでは複数行コメントは非サポート

for /l %%i in (1, 1, 100) do call :sub %%i
goto exit

:sub
set /a r3 = %1 %% 3
set /a r5 = %1 %% 5

if %r3% equ 0 (
  if %r5% equ 0 (
rem iが3の倍数かつ5の倍数
    echo Fizz,Buzz
  ) else (
rem iが3の倍数(かつ5の倍数でない)
    echo Fizz
  )
) else (
  if %r5% equ 0 (
rem iが5の倍数(かつ3の倍数でない)
    echo Buzz
  ) else (
rem iが3の倍数でも5の倍数でもない
    echo %1
  )
)

:exit

サブルーチンの再帰呼び出しによるプログラム:

@echo off

:: fizzbuzz_rc.bat
:: MS-DOSでは複数行コメントは非サポート

call :sub 100
goto exit

:sub
set /a prev = %1 - 1
if %prev% geq 1 (
  call :sub %prev%
)

set /a r3 = %1 %% 3
set /a r5 = %1 %% 5

if %r3% equ 0 (
  if %r5% equ 0 (
rem iが3の倍数かつ5の倍数
    echo Fizz,Buzz
  ) else (
rem iが3の倍数(かつ、5の倍数でない)
    echo Fizz
  )
) else (
  if %r5% equ 0 (
rem iが5の倍数(かつ、3の倍数でない)
    echo Buzz
  ) else (
rem iが3の倍数でも5の倍数でもない
    echo %1
  )
)

:exit

【theme : プログラミング
【genre : コンピュータ

プロフィール

よしいず

Author:よしいず
MATHEMATICS.PDFというウェブサイトを運営しています。

管理の都合上、トラックバックとコメントはオフにしてあります。ブログ経験者なら分かっていただけると思いますが、スパム(アダルトやその他の宣伝)ばかりなのが現実です。

リンクは自由です。当サイトの記事に対する間違いの指摘・意見・感想などを述べた記事からのリンクは歓迎です。ただし、ブログ記事アップ直後はミスが多く、頻繁に修正します。場合によっては削除する可能性もあります。その際、何も断りもなく修正・削除しますがご了承ください。内容を参考にする場合には投稿後一週間ほど様子を見てからにしてください(笑)。

記事の間違いを指摘するときは、その具体的箇所、理由(仕様に反するなど)・根拠(参考にした文献など)、代替案(同じ結果を得るための正しいやり方)も教えてください。そうしないと、(指摘される側および第三者はその時点では無知の状態なので、)どこが間違いなのか分かりませんし、本当に間違っているのかどうかが判断・検証できません。実際、間違いだと指摘されたことが結局は正しかったというケースもありますので。

このブログのタイトル一覧

リンク
月別アーカイブ
カテゴリ
最新記事
検索フォーム
RSSリンクの表示
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。