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

решить

1.Назовите основные встроенные функции для обработки данных в за Какая разница между за с параметрами и перекрестными за Какие существуют типы за на изменение?

Показать ответ
Ответ:
даша3335
даша3335
17.07.2020 22:23
// PascalABC.NET 3.3

const n=7;
begin
  Writeln('Исходный массив:');
  var a:=MatrRandomReal(n,n,-5,5); a.Println(6);
  var m:=a.ElementsByRow.Min;
  var imin:=a.ElementsWithIndexes.Where(k->k[0]=m).Select(k->k[1]).Single;
  var jmin:=a.ElementsWithIndexes.Where(k->k[0]=m).Select(k->k[2]).Single;
  writeln('min = a[',imin+1,',',jmin+1,'] =',m:6:2);
end.

Пример:
Исходный массив:
  4.68 -4.11  2.18  2.34 -1.06 -0.69  1.67
  4.58  3.27  1.39  4.55  0.32  0.65 -3.59
  3.10  0.66  0.94 -4.27 -1.46 -3.82 -0.40
 -4.90 -2.71  2.46 -1.43 -1.62  0.45  1.78
  1.59 -1.07  1.60 -0.16 -1.57 -0.83  2.95
  4.19 -3.16 -4.25  1.71 -4.27  1.04 -3.72
 -4.16 -2.30  0.90  4.46  3.51 -4.66  2.87
min = a[4,1] = -4.90
0,0(0 оценок)
Ответ:
mishkateddi19
mishkateddi19
24.08.2020 00:17
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (n,m):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(n,m,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var avg:=a.ElementsByRow.Average;
  Writeln('Среднее значение ',avg);
  var min:=(a.ElementsWithIndexes.Select(t->(Abs(t[0]-avg),t[1],t[2]))
      .MinBy(t->t[0]));
  Writeln('Наименее отличающийся от среднего элемент A[',
      min[1]+1,',',min[2]+1,'] = ',a[min[1],min[2]])
end.

Пример
Количество строк и столбцов в массиве: 5 7
*** Исходный массив ***
 -10  29 -69  98  40 -87 -64
  74 -36 -62 -86  -3  -6 -48
  -4  57  46 -23 -70  -5  25
 -98  -2  23   9 -42  77  65
 -57 -77  30  48 -52 -33   5

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