- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
输入语句 readln是输入语句,输入语句的一般格式为: ① read(变量1,变量2,…); ② readln(变量1,变量2,…); ③ readln。 前两种输入语句的多项数据之间以空格隔开,输出完毕后敲回车。使用read语句时,若输入的数据个数超过变量个数,则读完数据之后,能让后面的输入语句接着读取剩下的数据; 而readln 语句不能让后面的输入语句接着读取本行剩下来的数据项,因为已经回车换到下一行了。为了不受多输入的变量的影响,一般选择该语句作为输入语句。 第三种格式不需输入数据(其实输入任意内容的数据都被忽略),只需敲一个回车键。一般用于程序末尾,以方便回到编辑界面。 例1.4 已知一位小朋友的电影票价是10元,计算x位小朋友的总票价是多少? 【分析】 假设总票价用y来表示,则这个问题可以用以下几个步骤来实现: ①输入小朋友的数目x; ②用公式y=10*x计算总票价; ③输出总票价y的值。 程序如下: Program ex1_3; //程序首部 var x,y : integer; //说明部分(定义变量) begin readln(x); //小朋友的数目 y := 10*x; //计算总票价 writeln(total=,y); //输出总票价 end. Pascal常用函数 运算符 操作数类型 运算结果类型 算术运算符 +(加) 整型,实型 整型,实型 - (减) 整型,实型 整型,实型 * (乘) 整型,实型 整型,实型 / (实数除) 整型,实型 整型,实型 div (整数除) 整型 整型 Mod (求余) 整型 整型 关系运算符 =,,,=,=, 标准类型 布尔型 逻辑运算符 And(与运算) 布尔型 布尔型 Or(或运算) 布尔型 布尔型 Not(非运算) 布尔型 布尔型 Xor(异或运算) 布尔型 布尔型 例1.5 已知两个自然数a,b,输出a除以b的商和余数? 【分析】设存储商和余数的变量名是c和d,类型是整数类型。 ① 输入二个自然数a, b; ② 显示两数相除的数学表达式; ③ 求出a除以b的商c; ④ 求出a除以b的余数d; ⑤ 在表达式右边输出商和余数。 程序如下: Program ex1_5; var a,b,c,d : integer; begin readln(a,b); //输入a,b c := a div b; //整除运算,取商的整数部分 d := a mod b; //mod运算符是求二个数的余数 writeln(c,‘…,d); //输出后有换行 readln; //运行后不立即返回编辑界面,等待按回车 end. 【上机练习】 ) 1.输入三个数,计算并输出它们的平均值以及三个数的乘积,写出程序。 2.输入圆的半径R,求圆的面积和周长。 3.加法计算器:编程由键盘输入两个整数a和b,将它们的和输出到屏幕上。 4.某梯形的上底、下底和高分别为8,12,9,求该梯形的面积。 ( 梯形面积公式为 S= 5. 已知图圆柱体的高为12,底面圆的半径为7,求圆柱体表面积。 6. 进入Fp,调试以下程序: program ex1_6; var s : string; begin write(‘Please input your name’); readln(s); writeln(s,’ is the best.’); end. Pascal 教程 第一节 系统的启动 运行安装目录FPC\2.0.4\bin\i386-win32中的启动程序fp.exe(默认安装时桌面上也有启动的快捷方式)启动fp系统,运行后屏幕上出现如图所示的fp集成环境。 出现这样一片乱码,原因是操作系统“控制台窗口”中语言默认为中文。 调整方法:在窗口最上面的标题栏上右击,在快捷菜单中选择“默认值”,接着会弹出属性框,在最下面的“默认代码页”的下拉菜单中选择“437 (OEM–美国)”。 Free Pascal系统集成环境简介 控制台窗口属性框中
您可能关注的文档
最近下载
- 2025年一级造价工程师(交通)案例分析真题及答案解析(全网独家)-Titan精品.pdf VIP
- 2022年庆阳市镇原县中医院医护人员招聘考试题库及答案解析.docx VIP
- 山东省实验中学2025届高三第二次模拟-生物及答案.docx VIP
- 2024《海天味业存货管理问题及完善策略》9800字.doc VIP
- 深交所发行上市审核动态(2024年第3期,总第45期).pdf VIP
- 新思想期末考试及答案.doc VIP
- Java程序设计案例教程习题答案完整版机工版.pdf VIP
- 班子(在带头强化政治忠诚、提高政治能力;在带头固本培元、增强党性;在带头敬畏人民、敬畏组织、敬畏法纪;在带头干事创业、担当作为;在带头坚决扛起管党治党责任)存在不足.docx VIP
- 2026年北京公务员考试(3694人)(公共基础知识)综合能力测试题附答案.docx VIP
- 2011海南省建设工程计价定额说明与计算规则(房屋建筑与装饰工程).pdf
原创力文档


文档评论(0)