冲刺NOIP必掌握精讲.docVIP

冲刺NOIP2014必掌握资料 NOIP 2014，我一定能成功！ 注：‘*’表示重要程度。 一、基本函数 ⑴ 绝对值函数abs(x) abs(-2.3); { 2.3 } ⑵ 取整函数 int(x) int(123.567); { 123.0 } ⑶ 截尾函数 trunc(x) trunc(1.4) { 1 } ⑷ 四舍五入函数round(x) round(9.456) { 9 } ⑸ 取小数函数frac(x) frac(-123.456) { -0.456 } ⑹ 求平方根函数sqrt(x)和平方函数sqr(x) sqrt(64) {8} sqr(8) {64} ⑺ 随机函数random：随机产生一个0～1（不含1）之间的小数。 ⑻ 求字符串长度函数length length(‘asdf’) { 4 } ⑼ 复制子串或求子串的函数copy copy(‘window’,4,3) { dow } ⑽ 插入子串或插入字符串insert 例如：若st2:=‘wins’;执行insert(‘dow’,st2,4)后st2的值是‘windows’ ⑾ 删除子串delete 例如：若st=‘excel’;执行delete(st,4,2)后st的值是‘exc’ ⑿ 字符串转为数值val val(‘359’,a,c1)执行后将使变量a得到数值359（可参加四则运算） val(‘124.32’,b,c2)执行后将使变量b得到数值124.32（可参加四则运算） val(‘adb’,c,c3)执行后，c3将会出现错误值。 ⒀ 数值转为字符串str str(128,s1)执行后字符串变量s1得到‘128’ ⒁ 查找子串起始位置pos pos(‘in’,‘windows’)的值是2，pos(‘+’,‘13+418=’) 的值是3 ⒂ 字符完全串连+ ‘Bei’+‘jing’+‘2008’的值是Beijing2008 ⒃ 求字符的ASCII码的函数。也称序数函数。 ord(‘A’)的值是65 ord(‘Z’)的值是90 ⒄ 求ASCII码对应的字符的函数。也称字符函数 chr(78)的值是N, chr(57)的值是9 ⒅ 求前趋pred的函数 pred(‘D’)的值是C pred(‘65’)的值是64 ⒆ 后继succ的函数 succ(‘D’)的值是E ，succ(‘65’)的值是66 二、数学算法 1.欧几里得(最大公约数)** function gcd(a,b:longint):longint; begin if b=0 then exit(a) else gcd:=gcd(b,a mod b); end; 2.最小公倍数** function lcm(a,b:longint):longint; begin lcm:=a*b div gcd(a,b); end; 3.同余方程 //同余 即： a mod b=n mod b,也可表达为 a≡n(mod b); var a,b,n,i,j,k,d,e:longint; x,y:longint; function gcd(a,b:longint; var x,y:longint):longint; var t:longint; begin if b=0 then begin x:=1;y:=0; exit(a); end; gcd:=gcd(b, a mod b,x,y); t:=x; x:=y; y:=t-(a div b)*x; end; procedure noans; begin writeln(按题目要求); end; begin readln(a,b,n); d:=gcd(a,n,x,y); if n mod d0 then noans; e:=x*(b div d) mod n; while e0 do begin e:=(e+(n div d)) mod n; end; writeln(e); end. //解同余方程组 var a,b,x,y,k,n,m2,m1,a2,a1,g,t,c:longint; flag:boolean; function extended_gcd(a,b:l