第1讲Pascal语言基础知识一.pptVIP

Pascal语言程序设计 第一部分 第一讲 Pascal语言基础一 程序的基本结构 程序的上机调试和运行 语言基础一 例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. 上机调试运行步骤： 1、运行: Free Pascal 2、file?new :新建文件 3、compile?make :编译，找错误。 4、run ?run：运行 5、debug ? output(Alt+F5):察看结果 program 程序名；{可以省略}var 　变量说明；begin　语句；　语句；　……　语句;end. Pascal程序的基本结构 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. 示例: 程序的基本结构 一、变量的定义说明： 二、Pascal数据类型（整型、实型） 三、基本语句(赋值语句、输入语句read、输出语句write) 四、算术运算符和算术表达式 五、标准函数（数值型函数） 语言基础一 一、变量的定义说明： 在程序中用到的所有变量必须事先定义。 格式： Var 变量表　:　变量类型； 　　　┆ 　 变量表　:　变量类型； 　　　　 如：输入3个整数，求这3个数的平均值。 Var a，b，c：integer; aver:real; 二、Pascal数据类型 Var a,b:integer; c:longint; Begin readln(a); readln(b); c:=a+b; writeln(c): End. 120 200 10000 20000 20000 30000 测试以下3组数据： 输入整数a和b，输出a+b的值。 整型、实型、（字符型和布尔型） 1、整型 类型　　　　　数值范围　　　　 占字节数 Byte 0 .. 255 1 Word 0..65535