主题：2个小题目，大家来做做
zjsyzhong
[专家分：520] 发布于 2006-11-28 19:40:00
1.对于以下节日，输入节日所在的月份，输出节日的名称：元旦，劳动节，儿童，建军，国庆。
2.输出年.月.输出该月天数
回复列表 （共11个回复）
沙发
风神少年 [专家分：730] 发布于 2006-11-28 19:45:00
1.var a:integer;
begin
read(a);
case a of
1:writeln(a,'.1~yuan dan');
5:writeln(a,'.1~lao dong');
6:writeln(a,'.1~er tong');
8:writeln(a,'.1~jian jun);
10:wrieln(a,.'1~guo qing');
end;
end.
板凳
风神少年 [专家分：730] 发布于 2006-11-28 19:50:00
2.var
a,b,c:integer;
begin
read(a,b);
case b of
1,3,5,7,8,10,12:c:=31;
4,6,9,11:c:=30;
2:if(a mod 4=0) and (a mod 100<>0) or (a mod 400=0)
then c:=29
else c:=28;
end;
writeln(c);
end.
3 楼
zjsyzhong [专家分：520] 发布于 2006-11-29 12:20:00
第1题 按作文角度来讲 这个是离题的
[em12]
4 楼
sss333 [专家分：340] 发布于 2006-12-02 15:51:00
书上有,自己看
5 楼
编程黑客 [专家分：1660] 发布于 2006-12-03 10:26:00
请SSS333不要在回帖的内容中写些无聊的东西
6 楼
sss333 [专家分：340] 发布于 2006-12-03 17:52:00
书上是有呀,他(zjsyzhong,风神少年)与我一班,他自己想刷分
7 楼
风神少年 [专家分：730] 发布于 2006-12-05 17:03:00
zjsyzhong我送人拉，白痴sss333.自己想刷分别拖我和雷雷
[em24][em22][em24][em22][em29]
8 楼
zhangyuan [专家分：630] 发布于 2006-12-05 19:29:00
金雷雷云：“大家好！”
9 楼
zjh1312 [专家分：90] 发布于 2007-03-14 20:59:00
你们在哪上学啊...分什么提高班的么
10 楼
LSQ [专家分：220] 发布于 2007-05-05 10:41:00
1.var a:integer;
begin
read(a);
case a of
1:writeln(a,'.1~yuan dan');
5:writeln(a,'.1~lao dong');
6:writeln(a,'.1~er tong');
8:writeln(a,'.1~jian jun);
10:wrieln(a,.'1~guo qing');
end;
end.
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 2个小题目，大家来做做