第1讲Pascal语言基础知识.ppt
文本预览下载声明
第一讲 Pascal语言基础;信息学奥赛的内容：
程序=计算机语言+数据结构+算法; 信息学奥林匹克竞赛属于智力与应用计算机解题能力的比赛，题目有相当的难度，解好这类题目，需要具备很强的综合能力．
1、观察和分析问题的能力；
2、将实际问题转化为数学模型的能力；
3、灵活地运用各种算法的能力；
4、熟练编写程序并将其调试通过的能力；
5、根据题目的要求，自己设计测试数据，检查自己的解法是否正确、是否完备的能力．
能够参加信息学竞赛的选手应该具有很强的自学能力，需要学习有关组合数学、图论、基本算法、数据结构、人工智能搜索算法及数学建模等知识，还要学会高级语言和编程技巧，要具备很强的上机操作能力．;选手应具备的条件：
前提：综合成绩突出
1、扎实的数学基础。
2、很强的自学能力。
3、与同学之间的密切友好的合作与交流。
4、持之以恒，坚持不懈的学习。
5、耐得住枯燥与寂寞。
6、不能以参加竞赛为理由而耽误了其他文化课的学习。
;程序的基本结构 ;例1：
要将一张100元的大钞票，换成等值的10元、5元、2元、1元一张的小钞票，每次换成40张小钞票，每种至少1张。
如，有一种换法：
10元： 9 张
5元： 1 张
2元： 2 张
1元： 1 张
问：一共有多少种换法。;program ex1;
var
x1,x2,x3,x4,n:integer;
begin
n:=0;
for x1:=1 to 10 do
for x2:=1 to 20 do
for x3:=1 to 50 do
for x4:=1 to 100 do
if (10*x1+5*x2+2*x3+x4=100)and(x1+x2+x3+x4=40) then n:=n+1;
writeln(n);
end.;例2? 、
已知：
s=1+1/2+1/3+…+1/n
求：使s的值大于10时最小的n。;var
s : real;
n : integer;
begin
s:=0;
n:=0;
while s=10 do
begin
n:=n+1;
s:=s+1/n;
end;
writeln(n);
end.;例3、编一个程序，从键盘输入一个真分数的分子和分母，输出它的小数形式，精确到小数点后1000位。 ;var n,m,r,q,i:integer;
begin
read(n,m);
r:=n;
write(0.);
i:=1;
while i=1000 do
begin
q:=10*r div m;
r:=10*r mod m;
write(q);
i:=i+1;
end;
end.;上机调试运行步骤：;program 程序名；{可以省略} var 变量说明； begin 语句； 语句； …… 语句; end.;;2、完整的pascal程序框架： ;知识预备 基本符号、保留字、标识符
一、变量的定义说明：
二、Pascal数据类型（整型、实型）
三、基本语句(赋值语句、输入语句read、输出语句write)
四、算术运算符和算术表达式
五、标准函数（数值型函数）;基本符号、保留字、标识符;2．保留字：
保留字是指pascal语言中一些有特殊含义的英文单词，它们已被pascal语言自己使用，都有专门的用途。
Pascal 语言中保留字有36个，可分为以下六种类型：
① 程序、函数、过程的符号：
program，function，procedure
② 说明部分的专用定义符号：
array，const，file，label，packed，var，record，set，type，of
③ 语句专用符号：
case，do，downto，else，for，goto，if，repeat，then，to，until，while，with，forward
④ 运算符号：
and，div，in，mod，not，or
⑤ 分隔符号：
begin，end
⑥ 空指针常量：
Nil
7. PROTECTED, PUBLIC, PUBLISHED, TRY, FINALLY,
显示全部