Pascal历届NOIP复赛试题-分析【DOC精选】.docVIP

第12讲-历届NOIP复赛试题(1) 模拟试题 中文名 英文名 题型 分值 时限 Cantor canor 传统题 100 1s 回文数 huiwen 传统题 100 1s 装箱问题 pack 传统题 100 1s 单词接龙 dcjl 传统题 100 1s 1. Cantor表 （cantor.pas/c/cpp） 【问题描述】 现代数学的著名证明之一是Georg Cantor证明了有理数是可枚举的。他是用下面这一张表来证明这一命题的： 我们以Z字形给上表的每一项编号。第一项是1/1，然后是1/2，2/1，3/1，2/2，… 【输入】 整数N（1≤N 【输出】 表中的第N项 【样例输入】 7 【样例输出】 1/4 【分析】基础题，模拟。首先确定所在斜行，然后针对奇数行和偶数行进行计算。 【参考代码】 var n,x:longint; begin assign(input,cantor.in); reset(input); assign(output,cantor.out); rewrite(output); readln(n); x:=0; repeat //确定所在的斜行 inc(x); n:=n-x; until n=0; if x mod 2=0 then write ((x+n)