第四课上机编程练习

练习：

1、从键盘上读入长方形的边长a,b，计算它的面积和周长，输出。

2、输入一个时、分、秒，把它转换为一个秒数。

3、从键盘读入一个数，判断它的正负。是正数，则输出"+"，是负数，则输出"-"。

4、输入两个数a,b，输出较大数的平方值。

5、铁路托运行李规定：行李重不超过50公斤的，托运费按每公斤0.15元计费；如超50公斤，超过部分每公斤加收0.10元。编一程序完成自动计费工作。

6、某超市为了促销，规定：购物不足50元的按原价付款，超过50不足100的按九折付款，超过100元的，超过部分按八折付款。编一程序完成超市的自动计费的工作。

7、输入a,b,c三个不同的数，将它们按由小到大的顺序输出。 13、当前小学生的成绩单由以前的百分制改为优秀、良好、合格、不合格四个等级的等级制。编一程序完成分数的自动转换工作。转换规则如下：60分以下的为不合格；60到69分为合格；70到89分为良好；90分以上的为优秀。（提示：可以利用DIV运算来使程序更简明）

8、打印某年某月有多少天。（提示：A、闰年的计算方法：年数能被4整除，并且不能被100整除；或者能被400整除的整数年份。B、利用MOD运算可以判断一个数能否被另一个数整除）

9、编程模拟剪刀、石头、布游戏：用S表示剪刀，用R表示石头，用P表示布。规则是：剪刀剪布，石头砸剪刀，布包石头。游戏者分别把自己的选择输入，计算机给出结果。

10、以下程序的功能是从键盘输入一个式子，它只有三个字符，第一个及第三个都是数字，中间那个是运算符，程序能把它的结果打印出来。试在程序空中填上相应的语句。
注意：计算机是不懂得把输入的字符串进行计算的，我们必须自己动手把其中的数字转化成数值型的数据，这其中我们使用了VAL函数，如程序中的：Val(s[1],a,c)，是把S字符串中的第一个字符转换为数值A，同时输出了一个错误代码C（其实对我们是没有用的）。

Var a,b,c,d:real;

S:string[3];

Begin

Readln(s);

Val(s[1],a,c);　　　　　　　　;

Case s[2] of

‘+’:d:=a+b;

‘-’:d:=a-b;

‘*’: ;

‘/’:d:=a/b;

end;

writeln(s,’=’, );

end.

把S定义成三个字符的字符串；

把S串中的第一个字符转换为数值；
把S串中的第三个字符转换为数值；
用S串中的第二个字符作为条件表达式；

第四课 上机编程练习

第四课上机编程练习