Ответы на вопрос:
программа на паскале:
program a1;
var i, j : integer;
s : real;
a: array [1..5, 1..6] of real;
b: array [1..6] of real;
begin
for i: =1 to 5 do
for j: =1 to 6 do
readln(a[i,j]);
for j: =1 to 6 do
begin
s: =0;
for : =1 to 5 do
s: =s+a[i,j];
b[j]: =s
end;
write ('полученный массив в: ');
for j: =1 to d do
write(b[j]);
readln
end.
Популярно: Информатика
-
ArT00312.09.2020 11:14
-
alexandrsub67p08sqm28.04.2020 15:09
-
denian1134302.11.2022 06:16
-
Boodmi16.07.2021 15:41
-
Horse333328.08.2022 23:26
-
6polih123.07.2020 17:48
-
esaloverzhan29.05.2022 11:03
-
carinakulebaki6435630.08.2022 19:39
-
1Кусочек2Счастья05.04.2021 07:16
-
sddssddd21.10.2021 22:16