В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Juliabelich2004
Juliabelich2004
14.08.2022 01:04 •  Информатика

Разработать алгоритм и программу для вычисления среднего арифметического любых указанных строки или столбца двумерного массива размером [n×m]. значения n и m должны вводиться с клавиатуры (принять 4≤n≤10, 4≤m≤10). ввод номера строки или номера столбца – с клавиатуры. предусмотреть вывод исходного массива в виде таблицы.free pascal

Показать ответ
Ответ:
sasha33427
sasha33427
28.09.2020 06:53
Const
n = 10;
m = 10;

var i, j, column, row, sum_column, sum_row: integer;
arr: array [1..n,1..m] of integer;

begin 

for i :=1 to n do
begin
for j:=1 to m do
begin
arr[i,j]:= random()*10;
end;
end;

readln(row);
readln(column);
sum_column:= 0;
sum_row := 0;

for i:=1 to n do
begin
 sum_row := sum_row + arr[i,row];
end;

for j:=1 to m do
begin
 sum_column := sum_column + arr[column, j];
end;

writeln(sum_column);
writeln(sum_row);

end.

Не проверено. Написал сходу в окне. 
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота