选择结构case语句.ppt

选择结构——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+1end；例一：输入年、月，输出该月的天数讨论：每年的1、3、5、7、8、10、12月，每月有31天；4、6、9、11月，每月有30天；2月，若是闰年有29天，平年有28天。闰年是指年份能被4整除，但不能被100整除，或者年份能被400整除的年。设：年year月month每月天数days判断闰年表达式：(yearmod4=0)and(yearmod1000)or(yearmod400=0)例一：输入年、月，输出该月的天数一级算法：输入year,month计算days输出year,month,days12输入year,month计算days二级求精：1,3,5,7,8,10,12:days:=314,6,9,11:days:=30if闰年thendays:=29elsedays:=28输出year,month,days根据month的值选择计算例一：输入年、月，输出该月的天数例一：输入年、月，输出该月的天数Programmonthdays(input,output);varyear,month,days:integer;beginread(year,month);casemonthof1,3,5,7,8,10,12:days:=31;4,6,9,11:days:=30;2:if(yearmod4=0)and(yearmod1000)or(yearmod400=0)thendays:=29elsedays:=28end;writeln(year=,year,month=,month,days=,days)end.