pascal 顺序结构与基本数据类型(上机练习)

1、把下列程序输入PAS程序输入程序编辑窗口：

program ex05（input,output）； const

s='abcdefg'； var

i:integer； r:real； c:char； begin

i:=1234；r:=1234.5678； c:='#'；

writeln(i,i:6,i:3)；

writeln(r,r:12:5,r:8:5)； writeln(c,c:5)；

writeln(s,s:10,s:5)； end.

（1）通过自己思考，你认为程序运行的结果是什么？

（2）通过上机运行，程序运行的结果是什么？

2、求程序运行的结果：

program ex05（input,output）； var

a,b:integer； begin

a:=123；b:=56；

writeln(a,‘+’,b,‘=’,a+b)； writeln(a,‘-’,b,‘=’,a-b)； writeln(a,‘*’,b,‘=’,a*b)； writeln(a,‘/’,b,‘=’,a/b:8:2)； writeln(a,‘div’,b,‘=’,a div b)； writeln(a,‘mod’,b,‘=’,a mod b)； writeln(a,‘>’,b,‘=’,a>b)； writeln(a,‘<’,b,‘=’,awriteln(spr(a),’,’,sqrt(b+8),‘,’trunc(-5.67))； writeln(pred(5),’,’,succ(b+8),‘,’odd(a))； writeln； end.

3、下列程序有若干错误，把它修改成正确的程序后输出结果：

program 123ex05（input,output） var a,b:integer； begin； a=253

b=43

writeln(a,'*',b,'=',a*b) end 修改为：

4、输入一个三位整数，将它们反向输出。例如输入127，输出应为721。

5、一只笼子中关着若干只鸡和兔子，现已知鸡和兔子的头总共有H只，脚总共有F只，编程计算鸡和兔子各有几只？

1、所求程序编制如下：

2、把上述程序输入PAS程序输入程序编辑窗口，从键盘输入H＝12，F＝40，运行结果为：