中国教育在线
|
运行结果为： |
program jia;
var n, sum: integer;
begin
sum:=0;
for i:=1 to 100 do
sum:=sum + i;
writeln (sum);
end.
循环结构程序设计2 ：while语句
while 布尔表达式 do 语句；
program ji shu;
var odds, limit, sum: integer;
begin
readln (limit);
sum:=0;
odds:=1;
while odds<=limit do
begin
sum:=sum + odds;
odds:=odds+2
end;
writeln (sum);
end.
循环结构程序设计4：goto语句
goto语句是一种无条件转向语句，它可以控制直接从程序的一条语句转向另一条语句。goto语句的语法形式为：goto 标号；
其中标号必须是不超过４位整数的正整数或标识符组成，但标号必须在说明语句中先予以说明。
goto语句会使程序出现一种称为“乱面条”的结构，因此你最好还是不要去用。
1、试指出：下列if语句中，当x=80时, 运行的结果为：
begin
y:=0;
readln(x);
if x<0 then y:=5
else
if x<10 then begin
y:=10;
if x<100 then y:=100;
end
else y:=200;
write('y=',y);
end.
A．y=9 B．y=200 C．y=10 D．y=100
2、下面程序的功能是：
如过把初值一改为2，它的功能是：
program jia;
var n,sum:integer;
begin
sum:=0;
for i:=1 to 100 do step 2
sum:=sum+i;
writeln(sum);
end.
3、下面程序的输出结果是：
Begin
T:=1;n:=3;s:=0
While s<10 do
Begin
t:=t*n;
s:=s+t;
end
Write(‘s=‘,s);
End
① 凡本站注明“稿件来源：中国教育在线”的所有文字、图片和音视频稿件，版权均属本网所有，任何媒体、网站或个人未经本网协议授权不得转载、链接、转贴或以其他方式复制发表。已经本站协议授权的媒体、网站，在下载使用时必须注明“稿件来源：中国教育在线”，违者本站将依法追究责任。
② 本站注明稿件来源为其他媒体的文/图等稿件均为转载稿，本站转载出于非商业性的教育和科研之目的，并不意味着赞同其观点或证实其内容的真实性。如转载稿涉及版权等问题，请作者在两周内速来电或来函联系。
