作业帮 > 综合 > 作业

用pascal语句打印下列图形:1 121 12321 1234321 12321 121 1

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/09 02:26:23
用pascal语句打印下列图形:1 121 12321 1234321 12321 121 1
能用麻溜结贴,不能用继续追问.
program PrintTriangle;
const
LEVEL = 4;
var
row, col, max, num: Longint;
begin
max := 0;
for row := 1 to LEVEL * 2 - 1 do
begin
if row