М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
wikawolchkowa
wikawolchkowa
30.01.2020 18:59 •  Информатика

Дана матрица, найти сумму и минимальный элемент на главной диагонали. на языке паскаль. 20

👇
Ответ:
dminaeva
dminaeva
30.01.2020
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var d:=a.ElementsWithIndexes.Where(t->t[1]=t[2]).ToArray;
  Writeln('Сумма элементов на главной диагонали: ',d.Sum(t->t[0]));
  var q:=d.Min;
  Writeln('Минимальный элемент [',q[1]+1,',',q[2]+1,']=',q[0]);
end.

Пример
Количество строк и столбцов в матрице: 5 6
*** Исходная матрица ***
  -5 -34 -95 -24 -22 -24
  16 -43 -57 -55  44 -34
 -89  26 -25  26  63  75
 -53  53  23 -43 -65 -29
  12 -74 -39  71  84  12

Сумма элементов на главной диагонали: -32
Минимальный элемент [2,2]=-43
4,5(36 оценок)
Открыть все ответы
Ответ:
lizench
lizench
30.01.2020

1. b = 10

2. Пусть n - количество амеб количество часов, x - нужное количество амеб. Изначально n = 1, а t = 0. Будем умножать n на 2, а к t прибавлять 3 часа до тех пор, пока n ≤ x. В t будет необходимое время на x амеб.

3.

нц

пока снизу свободно

вниз

кц

нц

пока не снизу свободно

закрасить

вправо

кц

нц

пока снизу свободно

вправо

кц

нц

пока не снизу свободно

закрасить

вправо

кц

вниз

влево

нц

пока не сверху свободно

закрасить

влево

кц

нц

пока сверху свободно

влево

кц

нц

пока не сверху свободно

закрасить

влево

кц

Объяснение:

1. Рассмотрим последовательность номеров команд 11112.

4 единицы говорят о том, что к начальному числу 6 прибавили 4 раза b, т.е. имеем: 6 + 4b. После одна команда 2: (6 + 4b)*2, и получили 92. Решаем:

(6+4b)*2 = 92

6+4b = 46

4b = 40

b = 10

4,5(64 оценок)
Ответ:
Kira369
Kira369
30.01.2020

1. b = 10

2. Пусть n - количество амеб количество часов, x - нужное количество амеб. Изначально n = 1, а t = 0. Будем умножать n на 2, а к t прибавлять 3 часа до тех пор, пока n ≤ x. В t будет необходимое время на x амеб.

3.

нц

пока снизу свободно

вниз

кц

нц

пока не снизу свободно

закрасить

вправо

кц

нц

пока снизу свободно

вправо

кц

нц

пока не снизу свободно

закрасить

вправо

кц

вниз

влево

нц

пока не сверху свободно

закрасить

влево

кц

нц

пока сверху свободно

влево

кц

нц

пока не сверху свободно

закрасить

влево

кц

Объяснение:

1. Рассмотрим последовательность номеров команд 11112.

4 единицы говорят о том, что к начальному числу 6 прибавили 4 раза b, т.е. имеем: 6 + 4b. После одна команда 2: (6 + 4b)*2, и получили 92. Решаем:

(6+4b)*2 = 92

6+4b = 46

4b = 40

b = 10

4,5(91 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ