网页
资讯
视频
图片
知道
文库
贴吧
地图
采购
进入贴吧
全吧搜索
吧内搜索
搜贴
搜人
进吧
搜标签
日
一
二
三
四
五
六
签到排名:今日本吧第
个签到,
本吧因你更精彩,明天继续来努力!
本吧签到人数:0
一键签到
成为超级会员,使用一键签到
一键签到
本月漏签
0
次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行
补签
。
连续签到:
天 累计签到:
天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
10月26日
漏签
0
天
pascal吧
关注:
14,973
贴子:
132,441
看贴
图片
吧主推荐
视频
游戏
3
回复贴,共
1
页
<<返回pascal吧
>0< 加载中...
毫无头绪中。。。跪求求高人解答
只看楼主
收藏
回复
忆_蝶落花开
A+B
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
1111111
1222221
1233321
1234321
1233321
1222221
1111111
就是打出这个图形。。。
弱弱地说。。。不要用7个writeln。。。。
CHU_overlord
树网的核
5
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
有规律额
第i排第i个和最后的n-i直到中间都是i
狂舞之梦
A+B
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
for i:=1 to n do
for j:=1 to n do
begin
out:=j;
if out>((n+1) div 2) then out:=n+1-out;
hs:=i;
if hs>((n+1) div 2) then hs:=n+1-hs;
if out > hs then out:=hs;
end;
狂舞之梦
A+B
1
该楼层疑似违规已被系统折叠
隐藏此楼
查看此楼
基本思想是这个样子的。输出可以在里面用write,大循环中加writeln;
登录百度账号
扫二维码下载贴吧客户端
下载贴吧APP
看高清直播、视频!
贴吧页面意见反馈
违规贴吧举报反馈通道
贴吧违规信息处理公示