第一章初识Pascal语言【上机练习】1输入三个数,计算并输出它们的平均值以及三个数的乘积,写出程序。2输入圆的半径R,求圆的面积和周长。3加法计算器:编程由键盘输入两个整数a和b,将它们的和输出到屏幕上。4某梯形的上底、下底和高分别为8,12,9,求该梯形的面积。5已知图圆柱体的高为12,底面圆的半r径为7,求圆柱体表面积。6进入Fp,调试以下程序:programex1_6varsstri
gbegi
write‘Pleasei
putyour
ame’readl
swritel
s’isthebest’e
d第二章顺序结构【上机练习24】1已知某梯形的上底A13,下底B18,高H9,求它的面积S。2已知某圆的半径R139,求该圆的周长C与面积S?3输入长方形的边长ab,计算它的面积和周长,输出。4读入摄氏温度c,写程序将它转换成华氏温度f输出。已知f9c5325输入三个字符,输出每个字符的序号,然后反向输出这三个字符。求序号用ORD函数6输入一个三位自然数,把这个数的百位与个位数对调,输出对调后的自然数。7键盘输入两个实数,经过取整操作后,将其整数部分交换值后输出。【上机练习27】1有三个小朋友甲乙丙。甲有50粒糖果,乙有43粒糖果,丙有13粒糖果。现在他们做一个游戏。从甲开始,将自己的糖分三份,自己留一份,其余两份分别给乙与丙,多余的糖果自己吃掉,然后乙与丙也依次这样做。问最后甲、乙、丙三人各有书多少粒糖果?2交换两个变量的值:由键盘输入两个正整数A和B,编程交换这两个变量的值。3编写程序把一个三位整数反转,例如358反转成853。4某车棚存有自行车和三轮车共65辆,它们的轮子数合计为150个,求该棚内存有的自行车和三轮车各是多少辆?5五位好朋友相聚。第一位朋友带来了很多糖块赠送给各位朋友,使每人的糖块在各自原有的基础上翻了一倍;接着第二位好友也同样向每人赠送糖块,他同样使每人的糖块在各人已有的数量上翻了一倍;第三、第四、第五位好友都照此办理。经过这样的赠送之后,每人的糖块恰好都为32块。问各位好友原先的糖块数分别是多少6从键盘输入a、b、c求一元二次方程ax2bxc0的两个实数根不考虑无解的情况。
f第三章选择结构【上机练习32】1、假设邮局规定寄邮件时若每件重量在1公斤以内含1公斤,按每公斤15元计算邮费,如果超过1公斤时,其超出部分每公斤加收08元。请编程序计算邮件收费。2、输入三个正整数,若能用这三个数作为边长组成三角形,就计算并输出该三角形的面积,否则输出Ca
t。组成三角形的条件为r