ゲームの概要
CoddyのRジャーニー「基礎」セクションの一部 — レッスン 52/78。
チャレンジ
簡単この章では、関数、ループ、および条件分岐ロジックを使用して、カスタマイズ可能な FizzBuzz ゲームを作成します。
まず、number と divisor の2つの引数を取る check_divisible という関数を作成します。この関数は、数値が除数で割り切れる（余りがない）場合は TRUE を返し、そうでない場合は FALSE を返す必要があります。
入力から2つの数値を読み取り、それらを数値型に変換して、これらの値を使用して関数を呼び出します。返された結果を出力してください。
例えば、入力が以下の場合：
15
3出力は以下のようになります：
[1] TRUE入力が以下の場合：
15
5出力は以下のようになります：
[1] TRUE入力が以下の場合：
7
3出力は以下のようになります：
[1] FALSE自分で試してみよう
# 入力を読み込む
con <- file("stdin", "r")
number <- as.numeric(suppressWarnings(readLines(con, n = 1)))
divisor <- as.numeric(suppressWarnings(readLines(con, n = 1)))
# TODO: 2つの引数（numberとdivisor）を受け取るcheck_divisibleという名前の関数を作成してください。
# numberがdivisorで割り切れる場合はTRUEを、そうでない場合はFALSEを返します。
# 関数を呼び出して結果を表示する
print(check_divisible(number, divisor))