максимальное значение чисел в каждом столбце матрицы и его номер.

@VinceNsk · Регистрация: 13.06.2010

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

Введите матрицу вещественных чисел, размером N*M(N<=5, M<=8). Найдите максимальное значение чисел в каждом столбце матрицы и его номер. Выведите матрицу и под каждым столбцом найденный максимум , а строкой ниже - его номер

@Puporev · 13.06.2010, 21:45

Pascal

uses crt;
const nmax=8;
var a:array[1..nmax,1..nmax] of real;
    max:array[1..nmax] of real;
    nom:array[1..nmax] of byte;
    m,n,i,j,imx:byte;
    mx:real;
begin
clrscr;
randomize;
repeat
write('Количество строк до 5 n=');
readln(n);
until n in [1..5];
repeat
write('Количество столбцов до 8 m=');
readln(m);
until m in [1..8];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
   write('   ');
   for j:=1 to m do
    begin
     a[i,j]:=10*random;
     write(a[i,j]:5:2);
    end;
   writeln;
 end;
writeln;
for j:=1 to m do
 begin
  mx:=a[1,j];
  imx:=1;
  for i:=1 to n do
  if a[i,j]>mx then
   begin
    mx:=a[i,j];
    imx:=i;
   end;
  max[j]:=mx;
  nom[j]:=imx;
 end;
write('Max');
for i:=1 to m do
write(max[i]:5:2);
writeln;
write('Nom');
for i:=1 to m do
write('  ',nom[i],'  ');
readln
end.

Новые блоги и статьи
Из чего и как собрать свой домашний кинотеатр bt_guru 21.01.2025 Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .	Ошибки стиральных машин bt_guru 21.01.2025 Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .	Копирование (маппинг) объектов в JavaScript bytestream 21.01.2025 В современной разработке программного обеспечения копирование объектов представляет собой фундаментальную операцию, которая требует особого внимания и понимания. Маппинг объектов в JavaScript – это. . .	Как работать с Apache Kafka в C# .NET bytestream 21.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки больших объемов информации в реальном времени. Эта система,. . .	Как использовать RabbitMQ в C# .NET bytestream 21.01.2025 RabbitMQ представляет собой мощный брокер сообщений, который эффективно решает эту задачу, обеспечивая надежную передачу данных между множеством приложений. Этот инструмент реализует протокол AMQP. . .	Как объединить последние коммиты в Git bytestream 21.01.2025 В мире разработки программного обеспечения система контроля версий Git стала незаменимым инструментом для управления исходным кодом. Одной из наиболее полезных, но порой сложных для освоения функций. . .
Как запушить новую локальную ветку (branch) в удалённый репозиторий Git и отслеживать её bytestream 21.01.2025 В современной разработке программного обеспечения система контроля версий Git стала неотъемлемым инструментом для эффективного управления кодом и организации командной работы. Одной из ключевых. . .	Как создать директорию и все родительские директории, указанные в пути, с помощью Python bytestream 21.01.2025 Python предоставляет мощные инструменты для работы с файловой системой через встроенные модули os и pathlib, которые значительно упрощают процесс манипуляции директориями. Эти модули содержат. . .	Как работать с массивами в JavaScript bytestream 21.01.2025 Массивы в JavaScript представляют собой один из фундаментальных типов данных, который позволяет хранить упорядоченные коллекции различных элементов в одной переменной. Эта структура данных является. . .	Какая максимальная длина адреса (URL) в различных браузерах и стандартах bytestream 21.01.2025 В современном мире интернет-технологий URL-адреса (Uniform Resource Locator) играют фундаментальную роль в функционировании веб-пространства. Эти уникальные идентификаторы ресурсов стали неотъемлемой. . .	Как сбросить локальный репозиторий до состояния удалённого репозитория Git bytestream 21.01.2025 При разработке программного обеспечения с использованием системы контроля версий Git разработчики часто сталкиваются с необходимостью синхронизации локального и удаленного репозиториев. Данная задача. . .	Как запретить подсветку выделенного текста с помощью CSS bytestream 20.01.2025 Подсветка текста при выделении является стандартным поведением браузера, которое не всегда соответствует дизайнерским решениям или функциональным требованиям веб-приложения. Выделение текста может. . .

@VinceNsk 2 / 2 / 0 Регистрация: 13.06.2010 Сообщений: 42
		1
	максимальное значение чисел в каждом столбце матрицы и его номер. 13.06.2010, 21:23. Показов 1591. Ответов 1 Метки нет (Все метки) Введите матрицу вещественных чисел, размером N*M(N<=5, M<=8). Найдите максимальное значение чисел в каждом столбце матрицы и его номер. Выведите матрицу и под каждым столбцом найденный максимум , а строкой ниже - его номер 0

	13.06.2010, 21:45

Опции темы

максимальное значение чисел в каждом столбце матрицы и его номер.

Решение