中国教育在线
2010第十六届信息学奥林匹克竞赛讲稿
4下面程序的输出结果是：
program ex11_8;
var
n,i,j,k,p:longint;
begin
write('N=12');
i:=2;j:=0;k:=1;
repeat
inc(i);p:=j+k;j:=k;k:=p;
until i=12;
writeln('F(',12,')=',p);
end.
5、Begin
N:=6;a:=0
While n>1 do
Begin
a:=1;
repeat
write (‘’*’’);
a:=a+1
until a>=n;
writeln;
n:=n-1;
end
end
免责声明：
① 凡本站注明“稿件来源：中国教育在线”的所有文字、图片和音视频稿件，版权均属本网所有，任何媒体、网站或个人未经本网协议授权不得转载、链接、转贴或以其他方式复制发表。已经本站协议授权的媒体、网站，在下载使用时必须注明“稿件来源：中国教育在线”，违者本站将依法追究责任。
② 本站注明稿件来源为其他媒体的文/图等稿件均为转载稿，本站转载出于非商业性的教育和科研之目的，并不意味着赞同其观点或证实其内容的真实性。如转载稿涉及版权等问题，请作者在两周内速来电或来函联系。
热门推荐
澳门高考
热门关注
