Pascal基础练习题.docVIP

输入a，b两个变量的值，打印输出 a+b的横式与竖式。 编写程序，任意输入一个三位正整数，然后倒序输出。比如输入的是285 ，输出的就该是582。 请看图3-2，判断任意一点A（x,y）是否在圆环内。如果在圆环内输出True，否则输出False。使用输入语句获取X,Y的值。提示：首先推导出判别式为 2=x2+y2=25 某服装店对售货员发放奖金的办法是：日营业额在1000元以下的，只能拿到基本工资，没有奖金；超过1000元的，奖金为超出部分的2％。编写程序输入营业额，计算并输出奖金。 编写程序计算y的值。 Sqrt(a+b)＋sin(a-b) a0,b0 Y＝ 1 a=0,b=0 a2+b2 其他 从键盘输入三个整数，输出最大数max和最小数min。 已知三角形的三条边长为a，b，c，求三角形面积。 提示：用海沦公式求三角形面积s=sqrt(p*(p-a)*(p-b)*(p-c)) p=(a+b+c)/2 输入年号、月份，输出该月的天数。 1、3、5、7、8、10、12月为31天，4、6、9、11月为30天，2月平年28天，润年29天。润年判别式为：（y mod 4=0） and (y mod 1000) or (y mod 400=0) 9、模拟一个有加、减、乘除运算的简单计算器。当输入一个实型数，再输入一个运算符，再输入一个实型数后马上输出运算结果。比如：输入3.5*4.0后程序运行结果应该是14.0。 10、求n！（即1*2*..*n），n由键盘输入。 11、求1-1/2+1/3-1/4…+1/99-1/100的值。 12、利用双重循环编写出打印出右边数字方阵的程序。 1 2 3 4 5 6 2 3 4 5 6 7 3 4 5 6 7 8 5 6 7 8 9 10 6 7 8 9 10 11 13、写程序打印右图。 1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1 1 2 3 4 5 4 3 2 1 1 2 3 4 5 6 5 4 3 2 1 14、编程打印出右图 1 2 3 4 5 6 7 8 9 10 12 13 14 15 15、打印输入的n个整数中的最大、最小数及其序号。 16、编写程序，打印出100~200之内的全部素数。 17、找出1~1000之间的全部“水仙花数”。“水仙花数”是这样一个整数，它的每一位数字的立方之和正好等于这个三位数，例如153是“水仙花数”，因为13+53+33=153。 18、解数学灯迷，有以下算式： A B C D － C D C -------------- A B C A,B,C,D均为一位非负整数，要求找出A,B,C,D的值，请编程序。 19、给出一个正整数，求出它的因子，并按下面的格式打印出来： 15=3*5,20=2*2*5,28=2*2*7 20、找出1~100之间的全部“同构数”。“同构数”是这样一种数：它出现在它的平方数的右端。例如：5的平方是25，5就是同构数，25也是构数。 21、任给一个自然数n，求出这个自然数不同因数的个数。 22、《猴子分苹果》趣味程序设计：傍晚，五只猴子在树林里发现一堆苹果，约定第二天早上再来平分，于是各自回去睡觉。半夜一只猴子醒来，把苹果平分了五分，发现多出一个苹果。给谁都不合适，又不能扔掉，只好自己吃了，然后它把其中一堆藏了起来，剩下的四堆又混在一起，高高兴兴地睡觉去了。过了一会，又有一只猴子醒来，它和第一只猴子一样，把苹果平分了五份，发现多出一个苹果，给谁都不合适，又不能扔掉，只好自己吃了，然后它把其中一堆藏了起来，剩下的四堆又混在一起，也去睡觉了。这一夜五只谗嘴的猴子都没睡塌实，五只猴子都以同样的办法把苹果分一次。第二天早上，五只猴子起来看着变少了的苹果各自心照不宣，它们一起把苹果分了五份，正好一个不多一个不少。请编写程序计算出一开始总共有多少苹果。 任意输入两个正整数，求它们的最大公约数和最小公倍数。 24、开灯问题。 有从1到n依次编号的n个人和n盏灯。1号人将所有的灯都关掉；2号人将编号为2的倍数的灯都打开；3号人则将编号为3的倍数的灯作相反处理；以后的人都将凡是自己编号的倍数的灯作相反处理。问第n个人操作后，哪些灯是打开的？ 25、12个小朋友手拉手站成一个圆圈，从某一个小朋友开始报数，报到7的那个小朋友退到圈外，然后他的下一位重新报“1”。这样继续下去，最后只剩下一个小朋友，他原来站在什么位置上呢？ 26、给出一串整数数列，求