枚举与优化.ppt

陶陶摘苹果(apple.pas/c/cpp)【问题描述】陶陶家的院子里有一棵苹果树，每到秋天树上就会结出10个苹果。苹果成熟的时候，陶陶就会跑去摘苹果。陶陶有个30厘米高的板凳，当她不能直接用手摘到苹果的时候，就会踩到板凳上再试试。现在已知10个苹果到地面的高度，以及陶陶把手伸直的时候能够达到的最大高度，请帮陶陶算一下她能够摘到的苹果的数目。假设她碰到苹果，苹果就会掉下来。 【输入文件】输入文件apple.in包括两行数据。第一行包含10个100到200之间（包括100和200）的整数（以厘米为单位）分别表示10个苹果到地面的高度，两个相邻的整数之间用一个空格隔开。第二行只包括一个100到120之间（包含100和120）的整数（以厘米为单位），表示陶陶把手伸直的时候能够达到的最大高度。【输出文件】输出文件apple.out包括一行，这一行只包含一个整数，表示陶陶能够摘到的苹果的数目。【样例输入】100 200 150 140 129 134 167 198 200 111110【样例输出】5 program apple; var a:array[1..10] of integer; n,i,total:integer; begin assign(input,apple.in); reset(input); for i:=1 to 10 do read(a[i]); readln(n); close(input); n:=n+30; for I:=1 to 10 do if n=a[i] then inc(total); assign(output,apple.out); rewrite(output); writeln(total); close(output); End. 丑数（ugly） 【问题描述】所谓丑数，就是指那些因子只含2，3，5的数。1，2，3，4，5，6，8，9，10，12，15是最前面的11个丑数。为了方便起见，把1也看作是丑数。请你编写一个程序，输入n，寻找并打印第n个丑数。 【输入数据】 输入文件仅包含一个整数n（0＜n＜3000）。 【输出数据】 输出文件仅包含一个整数，表示所求的第n个丑数。 【样例】 ugly.in 11 ugly.out 15 program ugly; var i,n,h1,h2,h3:longint; min:qword; f:array[1..3000] of qword; begin assign(input,ugly.in); reset(input); assign(output,ugly.out); rewrite(output); readln(n); f[1]:=1; h1:=1;h2:=1;h3:=1; for i:=2 to n do begin min:=f[h1]*2; if 3*f[h2]min then min:=3*f[h2]; if 5*f[h3]min then min:=5*f[h3]; if min=2*f[h1] then inc(h1); if min=3*f[h2] then inc(h2); if min=5*f[h3] then inc(h3); f[i]:=min; end; write(f[n]); close(input); close(output); end. 班级人数 【问题描叙】 班会评选一级学生，（做出10题以上的有机会参加评选）。最后评选结果班上有超过P%但不足Q%的人被评上了（学生一：听起来像是URAL上的1011。）。现在给你P和Q，你要算出班上最少有多少人。（数据弱了一点，所以好通过）。 【输入格式】 两个实数P，Q。用空格隔开。每个数最多有两位小数。0.00=pq=99.99 【输出格式】 班上最少的人数。 【样例输入】 13 14.1 【样例输出】 15 【时间限制】 每个测试点1s 人数从小到大枚举 枚举 本题的解不存在连续性（如15人对，16人就错），不能二分，所以只能枚举。 注意：精度问题 program classes; var a,b,total1,total2:real; i,j,k,n:longint; f:boolean; begin assign(input,classes.in); res