Составьте программу формирования и вывода на экран одномерного массива

@Мадонна · Регистрация: 07.02.2012

Author24 — интернет-сервис помощи студентам

Составьте программу формирования и вывода на экран одномерного массива, состоящего из средних арифметических значений элементов каждого столбца, двумерного массива, заданного с помощью датчика случайных числ.

Комментарий модератора

Создавайте темы с осмысленными и понятными названиями - это серьезно повышает шансы, что на ваш вопрос ответят.

@Ev[G]eN · 22.02.2012, 22:24

Pascal

const
  n = 5;
var
  Mat: array[1..n, 1..n] of integer;
  arr: array[1..n] of real;
  Summa, i, j, k: integer;
  Sr: real;
begin
  randomize;
  writeln('Матрица: ');
  for i:=1 to n do
  begin
    for j:=1 to n do
    begin
      Mat[i, j]:=random(20)+1;
      write(Mat[i, j]:4);
    end;
    writeln;
  end;
  for j:=1 to n do
  begin
    for i:=1 to n do 
      inc(Summa, Mat[i, j]);
      Sr:=Summa / n;
      writeln('Среднее арифметическое ', j, '-ого столбца: ', Sr:0:2);
      arr[j]:=Sr;
      Sr:=0;
  end;
  writeln('Полученный массив: ');
  for k:=1 to j do
    write(arr[k], ' ');
end.

Новые блоги и статьи
Распознавание изображений (компьютерное зрение) на C++ InfoMaster 20.01.2025 Введение в компьютерное зрение и основы работы с изображениями Компьютерное зрение представляет собой одну из наиболее динамично развивающихся областей информационных технологий, позволяющую. . .	Какой язык программирования лучший для разработки нейронных сетей InfoMaster 20.01.2025 В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .	Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .	Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .	Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .

	22.02.2012, 22:24

Опции темы

Составьте программу формирования и вывода на экран одномерного массива

Решение