scratch从2011年到现在有几个闰年怎么编程

今天我们用Scratch来做一个判断闰年的小程序。

判断闰年

判断闰年

判断闰年

题目：输入一个年份，判断并说出是否为闰年；

角色：小精灵；

知识点：闰年，侦测，逻辑与，逻辑或， 逻辑不成立，判断整除，变量，选择；

概念：闰年

年的概念，是地球围绕太阳一周的时间称为一年，这个周期是相当稳定的，很长时间也不会变动1秒，但是很遗憾的是这个周期并不能被一天的时间整除，真正的一年其实是365.2423天（目前）。所以，如果每年定义为365天的话，1年就清汪会多出0.2423天，4年就会多出0.9692天，非常接近1天，这样闰年就出现了，也就是每4年要有1年设置为366天，来抵消这多出的1天。补上时间差的年份为闰年。闰年共有366天(1-12月分别为31天，29天，31天，30天，31天，30天，31天，31天，30天，31天，30天，31天)。

闰年分为普通闰年和世纪闰年。

闰年判定方法：

1、能被4整除，但不能被100整除的为闰年。（如2004年就是闰年，1800年不是闰年）

2、能被400整除的是闰年。(如2000年是闰年，1900年不是闰年)

一、准备工作

1、背景：背景库中选择“户外”类；

背景库

2、角色：角色库中选择“动物”类；

角色库

3、变量：新建一个变量，命名为“年份”；

变量年份

二、编辑脚本

1、变量初始化：变量年份初始状态赋值为0；

变量初始化

2、重复询问：使用循环控制模块“重复执行”，实现多次判断；

重复执行

3、变并磨量赋值：侦测输入的数值，赋值给变量年份；

变量赋值

4、选择结构：使用判断结构模块“如果……那么……否则……”

选择结构

5、判断条件：本节的重点难点

（1）连接判断条件：使用三个逻辑运算“与”、“或”、“不成立（非）”连接判断条件，即能被4整除并且（与）不能（不成立）被100整除的，或能被400整答蔽仔除的是闰年；

逻辑运算

（2）判断整除：整除即余数等于0，使用下面两个运算模块连接；

判断整除

（3）完整判断条件：判断条件为多个运算模块组合；

判断闰年

6、说出结果：判断结果为真时说是闰年，否则说不是闰年，是平年，使用连接模块连接要说的内容；

三、完整脚本

想一想，闰年除了用逻辑运算来判断外，还有没有别的方法呢？

Dim a As Integer, b As Integer, i As Integer, n As Integer

Private Sub Command1_click()

a = Val(InputBox("请输入渣数肢开始毕橡年份"如世))

b = Val(InputBox("请输入结束年份"))

For i = a To b

If i Mod 4 = 0 And i Mod 100 <>0 Then

Print i

n = n + 1

If n Mod 5 = 0 Then Print

End If

Next i

End Sub

---