CASE <表达式> OF <情况1>: 语句 1 <情况1>: 语句 1 …… <情况n>: 语句 n (ELSE 语句 n1) END
#
FOR 循环控制变量:=循环初值 TO 循环终值 DO For语句 1.递增型FOR循环? FOR 循环控制变量:=循环初值 TO 循环终值 DO 循环的语句(或语段)例: FOR I:=5 TO 10 DO WRITELN (I)?如果要重复多个语句一定要用BEGIN-END形式:?例:FOR I:=1 TO 10 DO? BEGIN? WRITELN (I)?
program chen(inputoutput)var is:longintbegins:=1i:=1while i<=10 dobegins:=sii:=i2endwriteln(s) chen(inputoutput)var is:longintbegins:=1i:=1repeats:=sii:=i2until i>8writeln(s)end.
IF 条件1 THEN 顺序处理语句1 ELSIF 条件2 THEN 顺序处理语句2 ……ELSIF 条件N THEN 顺序处理语句N ELSE 顺序处理语句0 END IF END IF 该程序可以实现二输入与门的功能LIBRARY IEEEUSE ENTITY 2AND IS PORT ( AB: IN STD-LOGI
#
#
单击此处编辑母版标题样式单击此处编辑母版文本样式第二级第三级第四级第五级PASCAL基础教程PASCAL基础教程 信息学奥林匹克竞赛是一项益智性的竞赛活动核心是考查选手的智力和使用计算机解题的能力选手首先应针对竞赛中题目的要求构建数学模型进而构造出计算机可以接受的算法之后要写出高级语言程序上机调试通过程序设计是信息学奥林匹克竞赛的基本功在青少年朋友参与竞赛活动的第一步必须掌握一门高级
单击此处编辑母版标题样式单击此处编辑母版文本样式第二级第三级第四级第五级PASCAL基础教程PASCAL基础教程 信息学奥林匹克竞赛是一项益智性的竞赛活动核心是考查选手的智力和使用计算机解题的能力选手首先应针对竞赛中题目的要求构建数学模型进而构造出计算机可以接受的算法之后要写出高级语言程序上机调试通过程序设计是信息学奥林匹克竞赛的基本功在青少年朋友参与竞赛活动的第一步必须掌握一门高级
Free Pascal的启动shr string then threadvar to true try type unit until uses var while with xor 共75个保留字_Pascal数据类型自定义变量运算符和表达式输入语句复合语句Case语句1计算下列式子的值:(1)13……99(2)1248……1282562输入一个整数计算它各位上数字的和
违法有害信息,请在下方选择原因提交举报