电脑/网络 -> 编程语言 -> 其他编程语言更改分类 求助团队 匿名| 财富悬赏 0 5 10 15 20 30 50 80 100

电脑/网络->编程语言->其他编程语言更改分类求助团队匿名|财富悬赏05101520305080100... 电脑/网络 -> 编程语言 -> 其他编程语言更改分类求助团队匿名|财富悬赏05101520305080100 展开
 我来答
morebao598
2012-12-07 · TA获得超过2810个赞
知道大有可为答主
回答量:9076
采纳率:0%
帮助的人:2464万
展开全部
如何糊状,不回答呢?
Project1的程序;
类型
TMAN记录
相对字节;
编号:字节;
结束;
VAR
男子:ARRAY [1 .. 100]的TMAN中
版本:ARRAY [1 .. 200,0 .. 1字节;
N,K,I,J:整数;
开始
Readln(N,K);
我:= 1到k做
> Readln(REL [I,0],相对[1]);
我:= 1到n
开始
人[I]。 REL:= I;
人[I]。编号:做
J:= 1 = 0;
结束
我:= 1到n的k
开始
关系[J,0 ] = I然后
人[REL [J]。 REL:人[I]。相对
否则,如果相对[J]?? = I然后
人[REL [J,0]。 REL:人[I]。 ;
结束;
我:= 1到n做
公司(人[文[I]。REL]。参考);
J:= 0; / a> K:= 0;
我:= 1到n做
开始
人[I]。参考> 0,则
公司(J);
人[I]。参考> k,那么
K:=人[I]。参考
结束;
Writeln('----',#13#10,J,K,'');
Readln;
结束。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
oracle九叔
2012-11-23 · TA获得超过4.9万个赞
知道大有可为答主
回答量:4.9万
采纳率:83%
帮助的人:1.3亿
展开全部
什么意思!
难道这个问题是任务!
请您详细描述你的问题吧!
望采纳建议!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友58bd0c8
2012-11-23 · 超过21用户采纳过TA的回答
知道答主
回答量:252
采纳率:50%
帮助的人:50.5万
展开全部
2货
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2012-11-25
展开全部
看不懂说什么?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式