游戏概览

本课属于 Coddy R 学习旅程的“基础知识”单元。第 52 课，共 78 课。

挑战

简单

在这一章中，你将使用函数、循环和条件逻辑，构建一个可自定义的 FizzBuzz 游戏。

首先，创建一个名为 check_divisible 的函数，它接受两个参数：number 和 divisor。如果 number 能被 divisor 整除（没有余数），函数应返回 TRUE；否则返回 FALSE。

从输入中读取两个数字，将它们转换为数值，然后用这些值调用你的函数。打印返回的结果。

例如，如果输入是：

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: 创建一个名为 check_divisible 的函数，接收两个参数：
# number 和 divisor。如果 number 能被 divisor 整除，返回 TRUE；否则返回 FALSE。


# 调用你编写的函数并打印结果
print(check_divisible(number, divisor))