网站大量收购独家精品文档,联系QQ:2885784924

Pascal语言学习入门new.doc

  1. 1、本文档共17页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Pascal语言学习入门new.doc

Pascal语言入门篇 引入: fpc-2.0.0.i386-win32 程序一:已知长方形的长、宽,求长方形的周长 program circle; 该程序的首部,program是保留字 var chang,kuan,zhouchang:real; 定义变量:设定长,宽,周长为实数类型 begin 开始语句 readln(chang); 读语句,读入长(chang)和宽(kuan) readln(kuan); zhouchang:=2*(chang+kuan); 赋值语句,将计算结果赋给zhouchang write(zhouchang); 写语句,将结果(zhouchang) end. 结束语句,与begin成对出现 程序二:已知长方形的长、宽,求长方形的周长,并求出长方形的面积。 rogram circle; var chang,kuan,zhouchang,mianji:real; begin readln(chang); readln(kuan); zhouchang:=2*(chang+kuan); mianji:=chang*kuan; write(zhouchang,mianji); end. 小结:一个完整的pascal程序结构 Program 程序名(程序参数表); var 变量说明; Begin 语句; 语句; …… End. 运行 Ctrl+F9 返回看结果Alt+F6 思考练习: 1、已知长方体的长、宽、高,求长方体的表面积及体积。 2、已知正方体的边长,求正方体的表面积及体积。 3、已知圆半径,求圆的周长及面积。 作业 已知圆半径,求圆的周长及面积。3.14若改成3.14159 增加程序的可读性,用pi表示 一、常量说明 Const pi=3.14159 变量说明 VAR 单个变量或用逗号分开的多个变量 变量表:类型 二、标准数据类型 (一)、实型(real) 1、两种表示方法:小数表示法和指数表示法 小数表示法:1.25,0.0025,258.2,253.0 科学表示法:1.25e0,1.3654e+2,2.5e-3, 0e0,1e2 2、说明方式 const k=1.26 var m,n:real; 3、运算:+(加),—(减),*(乘),/(除) 标准函数: abs(绝对值),sqr(平方),sqrt(开方), trunc(取整),round(舍入取整) (二)、整型(integer) 1、表示方法:25,-456,0 2、说明方法: const long=150; wide=65; var I,j,k:integer; 3、整型量的运算: +(加),—(减),*(乘),div(整除) /(除)得到的值为实型,mod(取余) 4、用于整数的标准函数 abs(绝对值),sqr(平方),pred(前导) succ(后续), 三、读语句一:read 用于在程序执行时,从外部输入数据给变量 一般形式:read(变量表) 其中变量表是一些由逗号分开的变量 程序一、读入2个整数和1个实数,并将这三个数输出。 Program shu; Var x,y:integer; z:real; begin read(x); read(y); read(z); write(x); write(y); write(z); end. Program shu; Var x,y:integer; z:real; begin read(x,y,z); write(x,y,z); end. 可以将读入与写出语句合并成一句。 注意:从键盘上输入的数据必须与程序中设定的输入变量的类型相同。例如上题,x,y是整型,我们从键盘上输入就必须是整型数,例如:14、-6,而不能是实型数,例如:1.9、98.0;而z是实型数,输入可以是小数也可以是整数,例如:2.36666 ,或者是10。 读语句二:readln 在完成该语句的最后一个变量值的输入以后,将结束包括这个数据值的输入行,使下一个read语句(或readln语句)从下一个新行开始输入数据。 例: Program shu2; Var a,b:real; begin Read(a,b); Read(c,d,e,f); Read(g,h); Writeln

文档评论(0)

qspd + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档