百度作业网请高手用Pascal语言编写下列程序
来源：学生作业帮 编辑：百度作业网作业帮 分类：综合作业 时间：2024/06/24 17:30:08
请高手用Pascal语言编写下列程序
输出杨辉三角的前N行(N
输出杨辉三角的前N行(N
f[i,j]=f[i-1,j]+f[i-1,j+1]
f[i,j]表示杨辉三角形的第i行第j列.
f[1,1]=1;
for i:=2 to 10 do
for j:=1 to i do
f[i,j]=f[i-1,j]+f[i-1,j+1];
然后输出
再问： 能不能写出全部过程？
再答： var f:array[0..10,0..10] of longint; i,j:longint; begin f[1,1]:=1; for i:=2 to 10 do for j:=1 to i do f[i,j]:=f[i-1,j]+f[i-1,j+1]; for i:=1 to 10 do begin for j:=1 to i do write(f[i,j],' '); writeln; end; end. 还没有编译。。大概就这样了吧。
f[i,j]表示杨辉三角形的第i行第j列.
f[1,1]=1;
for i:=2 to 10 do
for j:=1 to i do
f[i,j]=f[i-1,j]+f[i-1,j+1];
然后输出
再问： 能不能写出全部过程？
再答： var f:array[0..10,0..10] of longint; i,j:longint; begin f[1,1]:=1; for i:=2 to 10 do for j:=1 to i do f[i,j]:=f[i-1,j]+f[i-1,j+1]; for i:=1 to 10 do begin for j:=1 to i do write(f[i,j],' '); writeln; end; end. 还没有编译。。大概就这样了吧。