noip普及组复赛入门训练3

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 (P<100,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(1

输入： 0。725 2↙ 输出： 0。10111001100110011001

输入： 0。725 16↙ 输出： 0。B99999999A0000000000

本文来源：https://www.bwwdw.com/article/k5id.html