查人人中国名人网永州招聘58同城冷水滩:pascal编程问题
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/28 07:20:36
将1..8k的自然数表示成2k行,要求奇数在下,偶数在上.(k>0)
例如k=1,则输出: 2 4 6 8
1 3 5 7
k=4,则输出: 2 4 6 8
1 3 5 7
10 12 14 16
9 11 13 15
18 20 22 24
17 19 21 23
26 28 30 32
25 27 29 31
用pascal编程怎么做?
例如k=1,则输出: 2 4 6 8
1 3 5 7
k=4,则输出: 2 4 6 8
1 3 5 7
10 12 14 16
9 11 13 15
18 20 22 24
17 19 21 23
26 28 30 32
25 27 29 31
用pascal编程怎么做?
for m := 1 to k do
begin
for n := 1 to 4 do Write((4*(m-1)+n)*2, ' ');
Writeln;
for n := 1 to 4 do Write((4*(m-1)+n)*2-1, ' ');
Writeln;
end;
程序头, 声明变量什么的我就省了.
没调试, 自己试一下吧, 如果有什么问题自己改一下.