资源描述：
《chh信息奥赛讲义(一)》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。
1、信息奧赛讲义（一）例Ll_l己知半径，求圆周长和面积的程序PROGRAMcircle（input,output）;（*第1行：程序首部*）｛已知半径求圆周长和面积｝«）奶丁（*第3行：常量说明*）PI=3.14159;乂八1＜（*第5行：变量说明*）r,l,s:real;BEGIN（*B7行：语句部分*）read（r）;1:=2氺PI*r;s:=PI*r*r;write（r，l，s）;END.（*第12行：语句部分以END.结束*）例L0.001输入三角形底边和高，求该三角形的面积。写出程序。例L0_002写出下列PASCAL语句的执行结果A0:=(1>5);A
2、l:=(l<5);writeln(AOANDAO);writeln(AOANDAl);writeln(AlANDAO);writeln(AlANDA1);writeln(AOorAO);writeln(AOorAl);writeln(AIorAO);writeln(AlorAl);例L0_003例L2_2己知三角形的两边及夹角，求第三边及而积。设三角形的两边及夹角分别为a,b，a，第三边为c，面积为s。数学表达式PASCAL表达式b2-4acb*b-4*a*ca+bc+d(a+b)/(c+d)a+b,+dc(a+b)/c+dabcda*b/(c*d)或a*b/c
3、/d1—ac2a2+bx+cy/a2+b2-2abcosa—absina2则c=yja2+b2-2abcosa，s=—absma2若a以角度值输入，在计算sin和cos时应转换为弧度。角度转弧度的公式为:弧度=角度X71180PROGRAMXT2_2;CONSTPI=3.14159;VARa，b,alfa，c，s:real;BEGINread（a，b,alfa）;alfa:=alfa*PI/180;c:=sqrt（a*a+b*b-2*a*b*cos（alfa））;s:=l/2*a*b*sin（alfa）;write（alfa，c，s）;END.例L2_3输入一个
4、字符，求其序号、前导（即前一字符）、后继（即后一字符）。PROGRAML2_3;VARch,pch,sch:char;num:integer;BEGINwriteln;writeln;write('Pleaseinputacharacter:');readln(ch);write(’pch:’，pred(ch)，'，sch:’，succ(ch)，'，num:'，ord(ch))L2—4图END.例L2_4输入x，y。若在圆环内，输出true:若在圆环外，；输出false。圆环如图所示。讨论：如图所示，若下式l^x2+y2^4成立则在圆环内，否则在圆环外。设布尔变
5、量bool，当x，y在圆环闪时，让它取值为true,否则取值为false。“(x，y)若在圆环内”的表达式：(x2+y2>12)且(x2+y2<22)PROGRAML2_4;VARx，y:real;bookboolean;BEGINwriteln;write(’x=?');readln(x);write(,y=?*);readln(y);bool:=(x*x+y*y>=1)and(x*x+y*y<=4);write(bool);END.习题XT1_1判断下列标识符，哪些是合法的？哪些是非法的？x3，3x，al7，p5q，n，0，e，abed，x-,ex9.5XT
6、1_2输入三个数，计算并输出它们的平均值以及三个数的乘积，写出程序。XT1.3己知地球半径为6371km,计算并输出地球的表面积和体积，写出程序。球表而积计算公式s=4ttR2,球体积计算公式(其中R指球半径)。3XT1_4已知匀加速运动的初速度为10m/s，加速度为2m/s2,求20s以后的速度，20s内走过的路程及平均速度，写出程序。没初速度为vQ,加速度为a，时间为t，末速度为vt,路程为s，平均速度为vave,求末1S，速度公式：v,=v()+at,路程的公式：s=v^t-^—at2,平均速度为vave=yXT1_5读入摄氏温度c,将它转换成平氏温度/输
7、出，写出程序。转换公式：9/=r+32XT2_1下列数据哪些是整数？哪些是实数？哪些是非法的数？256,2.50，le+06，2.2e5,elO,-785,e-5,.5,15.,15.0,0.12,0,0.0,25e,XT2_2确定下列各常数、表达式的类型和值，表达式类型是指表达式值(结果)的类型。‘A’，’3’，3,true,false,12/3,12DIV3,5〉3,5<3,105MOD10，round(17/3,trunc(17/3),sqrt(ord(‘2’)-ord('0’))，sqr(ord(‘2’)-ord(‘0’))，(5>3)AND(5<3),
8、chr(67)XT2_3
