- 1、本文档共15页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
读程序programex_change;vara,b,c:integer;beginread(a,b);c:=a;a:=b;b:=c;write(a,,b);end.programex;varx,y,g,s,b:integer;beginread(x);g:=xmod10;b:=xdiv100;s:=xdiv10mod10;y:=g+s+b;write(y);end.
找错vara,b:integer;begina:=1.2;b:=‘a’;end.vara:real;b:char;
输入输出处理顺序结构
选择结构
判断奇偶数:输入一个整数,判断是否为偶数。是输出yes,否那么输出no。如果输入是偶数,输出“yes“否那么输出no条件yesno输入是偶数1010If输入是偶数then输出“yes“else输出no
简单的IF语句一、格式
IF<条件成立>THEN语句;
IF<条件成立>THEN语句1ELSE语句2;条件语句二语句一then语句条件thenelse成立成立
输入一个整数a,判断是否为偶数。
〔如果是偶数输出yes否那么输出no〕。programex_fz1;
vara:integer;
begin
readln(a);
ifamod2=0thenwriteln(‘yes’)
elsewriteln(‘no’);
end.
第10题关系运算符〔,=,,=,=,〕逻辑运算符〔orandnotxor〕布尔表达式结果是true或者false的表达式odd(n)=false
0-12-1≤x≤2x≤-1或者x≥2X=-1andx=2X=-1orx=2
运算符的优先级1、内层小括号先计算2、函数先求值3、单目运算符〔+,-,not〕4、乘的关系双目运算符〔*,/,div,mod,and〕5、加的关系双目运算符〔+,-,or〕6、关系运算符〔,=,,=,=,〕在同级运算中,按从左到右的顺序计算。X=-1andx=2(X=-1)or(x=2)(X=-1)and(x=2)
逻辑运算符逻辑运算符共有4个:not(取反)and(与)or(或)xor(异或)not:结果是与操作数相反的布尔值and:两个操作数都为真,结果为真,否那么为假or:两个操作有一个为真,结果为真,否那么为假Xor:两个操作数不一样为真,否那么为假1xor1=00xor0=01xor0=10xor1=1
语句条件输出输入课本:3-10输入2个数,如果a大于b就交换,最后输出a和b的值Ifabthen交换c:=a;a:=b;b:=c;beginend;p33
复合语句跟在if与else后面的语句不止一句,就要用到复合语句。用beginend把语句包括起来,从外部看,相当于一个语句。programexec2(input,output);
vara,b,c,s,p:real;
beginreadln(a,b,c);
if(a+bc)and(b+ca)and(c+ab)thenbeginp:=(a+b+c)/2;
s:=sqrt(s*(s-a)*(s-b)*(s-c));
writeln(‘s=’,s:6:2);
endelsebegin
writeln(a:6:2,b:6:2,c:6:2);
writeln(inputdataerror);
end;
end.
行礼托运价格:某车站行李托运收费标准是:10公斤或10公斤以下,收费2.5元,超过10公斤的行李,按每超过1公斤增加1.5元进行收费。试编一程序,输入行李的重量,算出托运费。Input输入只有一行,包括1个整数。Output输出只有一行,包括1个数。〔保存两位小数〕SampleInput10SampleOutput2.50第11题1010--1012
作业:第二章后面习题下周公布答案
文档评论(0)