Вопрос по информатике:
Необходимо решение задачи по ИКТ Pasckal 10 класс!!!
-Найти сумму элементов в каждой строке двумерного массива матрица.
Пожаловаться
- 12.04.2017 20:27
- Информатика
- remove_red_eye 2289
- thumb_up 19
Ответы и объяснения 2
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var a := MatrRandom(ReadInteger('m->'), ReadInteger('n->'), -100, 100); a.Println(4);
for var i := 0 to a.RowCount - 1 do Println(i + 1, 'строка=', a.Row(i).Sum);
end.
Пример:
m-> 4
n-> 5
-77 -22 53 -27 -36
91-100 53 -63 4
-76 -81 -73 -8 0
-87 -57 -6 -10 86
1 строка= -109
2 строка= -15
3 строка= -238
4 строка= -74
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var a := MatrRandom(ReadInteger('m->'), ReadInteger('n->'), -100, 100); a.Println(4);
for var i := 0 to a.RowCount - 1 do Println(i + 1, 'строка=', a.Row(i).Sum);
end.
Пример:
m-> 4
n-> 5
-77 -22 53 -27 -36
91-100 53 -63 4
-76 -81 -73 -8 0
-87 -57 -6 -10 86
1 строка= -109
2 строка= -15
3 строка= -238
4 строка= -74
Пожаловаться
- 13.04.2017 21:58
- thumb_up 3
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(m,n,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
Writeln('Суммы по строкам'); a.Rows.Select(r->r.Sum).Println
end.
Внимание! Если программа не работает, обновите версию!
begin
var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(m,n,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
Writeln('Суммы по строкам'); a.Rows.Select(r->r.Sum).Println
end.
Пожаловаться
- 14.04.2017 09:21
- thumb_up 20
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы