求助!Pascal好难啊!
pascal吧
全部回复
仅看楼主
level 9
1,信息技术期末考试完了,学校要求根据学生的考试成绩M分为A、B、C、D、E四级,其中对应关系为:A级(90<=M<=100)、B级(80<=M<90)、C级(70<=M<80)、D级(60<=M<70、E级(M<60)。
输入只有学生的成绩M(M<=100),注意,M是个实数。
输出 学生等级(用大写字母表示)。
2,
输入年份和月份,求当月有多少天。注意,闰年的判断方法为能被4整除且不能被100整除,或者能被400整除。
输入两个数yy和mm,代表年份和月份。
输出当月的天数。
2014年07月28日 11点07分 1
level 12
= =这种题都不能自己做,何时才能像吧里的大神一样吊……
2014年07月28日 12点07分 2
level 11
额额额额额
2014年07月28日 12点07分 3
level 9
新手啊!救救我吧
2014年07月28日 12点07分 4
level 12
1.
var t:integer;
begin
readln(t);
case t of
90 .. 100:writeln(*A*);
80 .. 89:writeln(*B*);
70 .. 79:writeln(*C*);
60 .. 69:writeln(*D*);
else writeln(*E*);
end;
end.
2.
var s,t:integer;
begin
read(s);
readln(t);
case t of
1,3,5,7,8,10,12:writeln(31);
4,6,9,11:writeln(30);
else if (s mod 4 = 0) and (s mod 100 <>0) or (s mod 400 = 0) writeln(29);
else writeln(28);
end;
end.
[瞌睡]反正LZ学得好不好不关我事,祝LZ像我一样永远成不了大神……
2014年07月28日 12点07分 5
level 9
谢谢你的回答及祝福!
2014年07月28日 12点07分 6
level 9
但是没有一道是对的
2014年07月28日 12点07分 7
自己修改。 基本上是对的
2014年07月28日 12点07分
真的不对.....
2014年07月28日 14点07分
回复 千山暮雪无情 :lz有自己加上program么[黑线]
2014年07月29日 00点07分
有的
2014年07月29日 01点07分
level 11
这种题不能自己思考吗
2014年07月28日 23点07分 8
LZ何时才能像吧内神犇一样吊
2014年07月28日 23点07分
回复 abslime :永远不能像您一样吊!
2014年07月30日 04点07分
永远不能像您一样吊!
2014年07月30日 04点07分
[惊哭]神犇们都来黑我这个蒟蒻了。。。
2014年07月30日 05点07分
level 9
笫二题输入的结果是:Free Pascal Compiler version 2.4.0-2ubuntu1.10.04 [2011/06/17] for i386
Copyright (c) 1993-2009 by Florian Klaempfl
Target OS: Linux for i386
Compiling Main.pas
Main.pas(9,62) Fatal: Syntax error, "THEN" expected but "identifier WRITELN" found
Fatal: Compilation aborted
Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)
2014年07月29日 01点07分 9
level 7
2014年07月29日 04点07分 11
level 7
我自己都测了一遍 10楼第一题 11楼第二题 应该没有问题 就是不能复制粘贴楼主得自己对着图片打[吐舌]
编程其实说难不难 说简单也不简单 但是把基础打扎实 一步一步慢慢走 用足够的耐心去做 就一定可以成功!加油↖(^ω^)↗
2014年07月29日 04点07分 12
level 9
谢谢!暖心^_^
2014年07月29日 09点07分 13
level 11
初学者么,水题
2014年08月01日 06点08分 14
level 13
[黑线][黑线]
2014年08月03日 05点08分 15
1