编程题 要把3个for循环改成1个for循环
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/09/22 13:38:23
编程题 要把3个for循环改成1个for循环
竞赛小组共有20位同学,这学期每位同学共参与了三项比赛,请统计每位同学的平均分.
分析:定义一个20行3列的二维数组来存放这些成绩.定义一个20个元素的一维数组来存放平均分.
program p1;
var
a:array [1..20,1..3] of integer;
b:array [1..20] of real;
i,j:integer;
begin
for i:=1 to 20 do
begin
for j:=1 to 3 do read(a[i,j]);
readln;
end;
{————从键盘上读入20个同学的三次竞赛成绩}
for i:=1 to 20 do b[i]:=0;
{————先将平均分数组清0}
for i:=1 to 20 do
begin
for j:=1 to 3 do b[i]:=b[i]+a[i,j];{————计算总分}
b[i]:=b[i]/3;{————计算平均分}
end;
for i:=1 to 20 do write(b[i]:5:1);
{————输出平均分}
writeln;
end.
竞赛小组共有20位同学,这学期每位同学共参与了三项比赛,请统计每位同学的平均分.
分析:定义一个20行3列的二维数组来存放这些成绩.定义一个20个元素的一维数组来存放平均分.
program p1;
var
a:array [1..20,1..3] of integer;
b:array [1..20] of real;
i,j:integer;
begin
for i:=1 to 20 do
begin
for j:=1 to 3 do read(a[i,j]);
readln;
end;
{————从键盘上读入20个同学的三次竞赛成绩}
for i:=1 to 20 do b[i]:=0;
{————先将平均分数组清0}
for i:=1 to 20 do
begin
for j:=1 to 3 do b[i]:=b[i]+a[i,j];{————计算总分}
b[i]:=b[i]/3;{————计算平均分}
end;
for i:=1 to 20 do write(b[i]:5:1);
{————输出平均分}
writeln;
end.
这种语言 没学过
定义二维数组 array[20][4]
for语句i
{读入array[i][0] array[i][1] array[i][2]
array[i][4]=(array[i][0]+array[i][1]+array[i][2])/3
输出array[i][4]}
再问: 是用pascal语言
定义二维数组 array[20][4]
for语句i
{读入array[i][0] array[i][1] array[i][2]
array[i][4]=(array[i][0]+array[i][1]+array[i][2])/3
输出array[i][4]}
再问: 是用pascal语言
java编程,采用for循环,
C语言while循环改成for循环
用两层循环for语句打印1个*到99个*
matlab编程-for循环和if语句
VB编程用For循环语句
2个for循环,在最里面的for循环中break,是跳出2个循环还只是最里面的循环
c语言for改成循环·
matlab中用for循环生成的n个单个数据怎么放入一个矩阵里,我用一个for循环做了个条件,得出1或0的结果,想把他们
C语言 循环结构问题for语句中是不少个{} 应该把整个if else 语句扩起来 如果for循环中没有{} 那么不是只
VB 2个FOR循环语句求解答
练习1:用for循环语句编程输出1、4、9、16、25、…、10000 练习2:用for循环语句编程输出1、1/2、1/
用MATLAB编程,编制一个M文件,分别使用for循环和while循环语句计算1^1+2^2+3^3+4^4+5^5+.