《选择结构case语句》由会员分享,可在线阅读,更多相关《选择结构case语句(6页珍藏版)》请在金锄头文库上搜索。
1、选择结构case语句,Pascal暑假微课系列,第04课,在同时出现多个条件时,根据情况从中选择其一运行的语句。,分情况case语句,格式1:,case 表达式 of 常数表1:语句1; 常数表2:语句2; 常数表n:语句n; end;,格式2:,case 表达式 of 常数表1:语句1; 常数表2:语句2; 常数表n:语句n; else 语句n+1 end;,例一:,输入年、月,输出该月的天数,讨论:每年的1、3、5、7、8、10、12月,每月有31天; 4、6、9、11月,每月有30天; 2月,若是闰年有29天,平年有28天。,闰年是指年份能被4整除,但不能被100整除,或者年份能被400
2、整除的年。,设:年year 月month 每月天数days,判断闰年表达式: (year mod 4=0) and (year mod 1000) or (year mod 400=0),例一:输入年、月,输出该月的天数,一级算法: 1.输入year,month 2.计算days 3.输出year,month,days,例一:输入年、月,输出该月的天数,二级求精: 1.输入year,month 2.计算days 根据month的值选择计算 1,3,5,7,8,10,12:days:=31 4,6,9,11: days:=30 2: if 闰年 then days:=29 else days:=
3、28 3.输出year,month,days,例一:输入年、月,输出该月的天数,Program monthdays(input,output); var year,month,days:integer; begin read(year,month); case month of 1,3,5,7,8,10,12:days:=31; 4,6,9,11:days:=30; 2:if (year mod 4=0) and (year mod 1000) or (year mod 400=0) then days:=29 else days:=28 end; writeln(year=,year, month=,month, days=,days) end.,