首页 > 其他 > 详细

Pascal输出星星

时间:2017-01-20 10:49:00      阅读:229      评论:0      收藏:0      [点我收藏+]
 1 program Project2;
 2 
 3 {$APPTYPE CONSOLE}
 4 
 5 uses
 6   SysUtils;
 7 
 8 var
 9   i,j:integer;
10 
11 begin
12   { TODO -oUser -cConsole Main : Insert code here }
13   for i:=1 to 5 do
14   begin
15   for j:=1 to i do
16   write(*);
17   writeln;
18   end;
19   readln;
20 end.

技术分享

Pascal输出星星

原文:http://www.cnblogs.com/lanjianhappy/p/6322127.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!