迎春舞会之交谊舞
背景 Background
HNSDFZ的同学们为了庆祝春节,准备排练一场舞会。
描述 Description
  明显……交谊舞是2个人跳的,而且一男一女 -____-||||。
  由于交谊舞之前的节目安排,所有的表演者都站成了一排。这一排人的顺序满足2点:
    ①对于一对舞伴男生站在女生的左边。
    ②任何一对舞伴之间,要么没有人,要么就有若干对舞伴。
  排得过于整齐导致那些要表演交谊舞的人都没办法看到自己的舞伴,怎么办类…….
  所幸的是,SDFZ的女生比男生聪明得多。她们知道自己左边有几个男生。
  现在就请你再告诉这些女生,她们的舞伴距离她们多远(即包括那个男生,一共有多少男生夹在他们之间)。

输入格式 Input Format
第一行为一个数n,表示参与跳交谊舞的女生个数。
第二行n个数,从左到右表示这n个女生左边分别有多少个男生。

输出格式 Output Format
一排n个数,行末无空格。表示n个女生与其舞伴的距离。

样例输入 Sample Input
6
4 5 6 6 6 6

样例输出 Sample Output
1 1 1 4 5 6
1vara:array[1..20000]ofinteger;
2x:array[0..10000]ofinteger;
3
4n,l,i,j,k:integer;
5begin
6assign(input,'T.txt');
7assign(output,'A.txt');
8reset(input);
9rewrite(output);
10readln(n);
11x[0]:=0;
12l:=1;
13k:=0;
14fori:=1tondo{读入男生数,构成一个数组男生是-1,女生是1}
15begin
16read(x[i]);
17forj:=x[i-1]+1tox[i]do
18begin
19k:=k+1;
20a[k]:=-1;
21end;
22k:=k+1;
23a[k]:=1;
24
25end;
26
27i:=1;
28
29whilen<>0do{一次检查女生和男生的匹配,如果输出了把男女生都设为0}
30begin
31whilea[i]<>1doi:=i+1;
32j:=i;
33whilea[j]<>-1doj:=j-1;
34ifn<>1thenwrite((i-j+1)div2,'')elsewrite((i-j+1)div2);
35forl:=jtoidoa[l]:=0;
36n:=n-1
37end;
38
39
40close(input);
41close(output);
42end.
43

优质内容筛选与推荐>>
1、android 6.0 以上在doze模式精确定时
2、[工具库]JFileDownloader工具类——多线程下载网络文件,并保存在本地
3、UIImage分类:返回一个可以拉伸的图片
4、实验报告四
5、怎么就这么难?


长按二维码向我转账

受苹果公司新规定影响,微信 iOS 版的赞赏功能被关闭,可通过二维码转账支持公众号。

    阅读
    好看
    已推荐到看一看
    你的朋友可以在“发现”-“看一看”看到你认为好看的文章。
    已取消,“好看”想法已同步删除
    已推荐到看一看 和朋友分享想法
    最多200字,当前共 发送

    已发送

    朋友将在看一看看到

    确定
    分享你的想法...
    取消

    分享想法到看一看

    确定
    最多200字,当前共

    发送中

    网络异常,请稍后重试

    微信扫一扫
    关注该公众号