Найти творенье частей К-ой и Р-ой строчек квадратной матрицы, размерностью 5х5
Отыскать творенье частей К-ой и Р-ой строчек квадратной матрицы, размерностью 5х5 (двумерный массив)
Задать свой вопрос
Полина Петрушкевич
Какое конкретно произведение? Получить 5 значений, перемножая для каждой колонки пару элементов? либо перемножить все 10 частей, избранных их этих строк и получить одно число?
Олег Горбарг
Хм.... видимо, так безотлагательно надобно...
Шаболина
Диана
А... надоело ожидать! Получите то, как сообразил!
1 ответ
Азаренкова Эвелина
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программка не работает, обновите версию!
begin
var n:=5;
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(n,n,-50,50);
a.Println(4); Writeln(4*a.ColCount*'-');
var (k,p):=ReadInteger2('Введите через пробел номера 2-ух строк:');
if k.Between(1,n) and p.Between(1,n) then begin
a.Row(k-1).Zip(a.Row(p-1),(x,y)-gt;x*y).Println;
end
end.
Пример
*** Начальная матрица ***
-45 -38 -15 34 -13
1 -38 39 34 -25
24 -41 -4 -25 -48
5 -19 -43 -15 -31
-21 27 -31 23 -39
--------------------
Введите через пробел номера 2-ух строк: 2 5
-21 -1026 -1209 782 975
// Внимание! Если программка не работает, обновите версию!
begin
var n:=5;
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(n,n,-50,50);
a.Println(4); Writeln(4*a.ColCount*'-');
var (k,p):=ReadInteger2('Введите через пробел номера 2-ух строк:');
if k.Between(1,n) and p.Between(1,n) then begin
a.Row(k-1).Zip(a.Row(p-1),(x,y)-gt;x*y).Println;
end
end.
Пример
*** Начальная матрица ***
-45 -38 -15 34 -13
1 -38 39 34 -25
24 -41 -4 -25 -48
5 -19 -43 -15 -31
-21 27 -31 23 -39
--------------------
Введите через пробел номера 2-ух строк: 2 5
-21 -1026 -1209 782 975
Данил Трахин
мне бы на паскале хотелось
Вячеслав Владимирска
спасибо
Витек Шехолевич
В первой же строке написано, что это Паскаль ))
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Сколько стоит коктейль молочный? Точную цену надо?
Математика.
Составить рассказ Из чего складывался культ монарха помазанника Божьего?
История.
Облако тегов