Задан двумерный массив размером 5х5 элементов. Затем, с клавиатуры вводится номер столбца...

0 голосов
77 просмотров

Задан двумерный массив размером 5х5 элементов. Затем, с клавиатуры вводится
номер столбца t.
Найти сумму чисел в столбце t исходного массива.


Информатика (25 баллов) | 77 просмотров
0

на коком языке?

0

Pascal

Дано ответов: 2
0 голосов
Правильный ответ

var

a: array [1..5, 1..5] of integer;

i, j, n: byte;

sum: integer;

begin

randomize;

writeln(' *** Исходный массив *** ');

for i := 1 to 5 do

begin

for j := 1 to 5 do

begin

a[i, j] := random(41) - 10;

write(a[i, j]:5);

end;

writeln;

end;

write('Введите № столбца: ');

readln(n);

sum := 0;

for i := 1 to 5 do

sum := sum + a[i, n];

writeln('Сумма элементов ', n, ' столбца = ', sum);

end.

(9.4k баллов)
0

Большое спасибо за подробное решение.

0 голосов

// PascalABC.NET

// Версия 3.4 сборка 1749 (18.08.2018)


begin

MatrRandom(5,5,0,10).Println.Col(ReadInteger-1).Sum.Println;

end.

(5.8k баллов)
0

Спасибо, но это слишком упрощенно, мы еще до таких переменных не доходили.

0

Тут и переменных никаких нету. Просто возможности современного программирования.