noip普及组复赛入门训练3.doc

PASCAL复习4 1. 字符序列(文件名 ZFXL.PAS) 任意输入三个字母，由程序判断其中是否有字母表中的相邻字母。如果是，输出TRUE，否则输出FALSE。例如，输入字母为”gpf”，其中g和f是字母表中的相邻字母，此时输出TRUE。 【输入】：输入只有一行，是一个字符序列，三个字母。 【输出】：输出共一行，TRUE或FALSE 输入输出样例： 输入：XGY 输入：kym 输出：TRUE 输出：FALSE 2．圆圈填空（文件名YQTK.PAS） :图中有10个小圆圈，其中6个已填入数字，这6个数字的特点是：相邻两数的平方和等于直径另一端相邻两数的平方和。如492+222=472+262，222+192=262+132。要求填入余下的4个空格（小于20的数），使其符合规律。 输入输出样例： 2 14 14 2 2 16 14 8 2 19 14 13 8 14 16 2 8 16 16 8 8 19 16 13 13 14 19 2 13 16 19 8 13 19 19 13 3. 友素数（文件名YSS.PAS） 若两个自然连续数乘积减1后是素数，则称此两个自然连续数为友数对，该素数称为友素数。例如，由于2×3－1＝5，因此，2与3是友数对，5是友素数。求［m，n］之间： 1）友数对的数目；2）所有友素数之和。 输入：m n 输出：友数对的数目， 所有友素数之和 输入输出样例： 输入： 1 50 输出： 28 21066 4. 值班表（文件名ZBB.PAS） 某医院内科有 A、 B、 C、 D、 E、 F、 G七位大夫，他们在从星期一到星期日的一周内每人要值一天班。排值班表的要求为： A大夫值班日比 C大夫晚一天； D大夫值班日比 E大夫晚两天； B大夫值班日比G大夫早三天； F大夫值班日在B、C大夫值班日之间，且在星期四(thu)。 请编出程序，打印出值班表。 输入输出样例： 输出： A B C D E F G 星期（英文缩写） 数字（1—7） 5.全1数字（文件名 QYSZ.PAS） 由键盘输入一个奇数 P (P100,000,000)，其个位数字不是5，求一个整数 S，使 P×S = 1111...1 ( 在给定的条件下，解 S 必存在)。要求在屏幕上依次输出以下结果: （1）S 的全部数字。除最后一行外，每行输出 50 位数字。 （2） 乘积的数字位数。 例1：输入p=13，由于13*8547=111111，则应输出（1）8547，（2）6 输入输出样例： 输入： p=13↙ 输出： 8547 6 输入： p=147↙ 输出： 755857898715041572184429327286470143613 42 6.小数转换（XSZH.PAS） 输入一个10进制的纯小数及一个整数N(1N17)，要求将此纯小数转换成N进制数输出。如输入0.125 16则输出0.2000000000000000输入0。725 2则输出0。10111001100110011001输入 0.825 10则输出 0.8250000000000000。 输入输出样例： 输入： 0。725 2↙ 输出： 0。10111001100110011001 输入： 0。725 16↙ 输出： 0。0000000000