pascal输出数字 1 7 2 12 8 3 16 13 9 4 19 17 14 10 5 21 20 18 15
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/14 04:26:57
pascal输出数字 1 7 2 12 8 3 16 13 9 4 19 17 14 10 5 21 20 18 15 11 6
输出者必加分
第一行1
第二行7 2
第三行12 8 3
第四行46 13 9 4
第五行19 17 14 10 5
第六行21 20 18 15 11 6
输出者必加分
第一行1
第二行7 2
第三行12 8 3
第四行46 13 9 4
第五行19 17 14 10 5
第六行21 20 18 15 11 6
var a:array[1..6,1..6]of integer;
i,j:integer; t:integer;
begin
t:=6;
a[1,1]:=1;
for i:=2 to 6 do
begin
a[i,1]:=a[i,1]+t+a[i-1,1];
t:=t-1;
end;
for i:=2 to 6 do
begin
t:=6-i+1;
for j:=2 to i do
begin
a[i,j]:=a[i,j-1]-t;
t:=t+1;
end;
end;
for i:=1 to 6 do
begin
for j:=1 to i do write(a[i,j],' ');
writeln;
end;
end.
i,j:integer; t:integer;
begin
t:=6;
a[1,1]:=1;
for i:=2 to 6 do
begin
a[i,1]:=a[i,1]+t+a[i-1,1];
t:=t-1;
end;
for i:=2 to 6 do
begin
t:=6-i+1;
for j:=2 to i do
begin
a[i,j]:=a[i,j-1]-t;
t:=t+1;
end;
end;
for i:=1 to 6 do
begin
for j:=1 to i do write(a[i,j],' ');
writeln;
end;
end.
pascal输出数字 1 7 2 12 8 3 16 13 9 4 19 17 14 10 5 21 20 18 15
pascal编程输出图形 7 6 5 8 1 4 9 2 3 10 11
pascal语言矩阵:1 3 6 10 15 2 5 9 14 19 4 8 13 18 22 7 12 17 21 2
c++ 输入n 输出n*n的数字矩阵 如 输入4输出 10 11 12 1 9 16 13 2 8 15 14 3 7
pascal蛇形矩阵n*n的矩阵,n:1-20,样例输出:1 12 11 10 2 13 16 9 3
Java 循环输出下列数字: 1 3 6 10 15 2 5 9 14 4 8 13 7 12 11
数字螺旋C语言代码输出结果如下:17 16 15 14 13 18 5 4 3 12 19 6 1 2 11 20 7
如何日用函数调用的方式输出如下数字三角形 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
使用数组编程 按下列格式输出数字 1 3 6 10 15 2 5 9 14 4 8 13 7 12
关于C语言的数字漩涡形输出:1 16 15 14 13 2 17 24 23 12 3 18 25 22 11 4 19
java编程输出如下的数字图案:1 3 6 10 15; 换行 2 5 9 14; 换行 4 8 13 ; 换行 7 1
Pascal求任意一个三位数数个位数字之和 输入:123; 输出:1+2+3=123