发布网友 发布时间:2024-10-24 15:54
共2个回答
热心网友 时间:2024-11-13 20:10
for i:=1 to n dobeginread(a[i]);a[i+n]:=a[i];end;
读入n个数a[1]~a[n],同时保存一份一样的到a[1+n]~a[n+n];执行完成后数组内容像这样:
7 4 8 9 1 5 7 4 8 9 1 5
for i:=1 to n dowrite(a[i],' ');writeln;
将a中前n个数输出:7 4 8 9 1 5
for i:=1 to n-1 dobeginfor j:=1 to n dowrite(a[i+j],' ');end;end.
输出(n-1)*n个数,在一行中,各个数如下表:
j= 1 2 3 4 5 6
i=1 a[2] a[3] a[4] a[5] a[6] a[7] 4 8 9 1 5 7
i=2 a[3] a[4] a[5] a[6] a[7] a[8] 8 9 1 5 7 4
i=3 a[4] a[5] a[6] a[7] a[8] a[9] 9 1 5 7 4 8
i=4 a[5] a[6] a[7] a[8] a[9] a[10] 1 5 7 4 8 9
i=5 a[6] a[7] a[8] a[9] a[10] a[11] 5 7 4 8 9 1
热心网友 时间:2024-11-13 20:15
67rza67rza67rza67rza67rza