Расставить столбцы в порядке возрастания

12.04.2012, 01:12. **Показов** 1297. **Ответов** 1

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

Помогите, пожалуйста решить задачу:

в массиве 8 на 8 целого типа, расставить столбцы в порядке возрастания максимальных элементов в них

@Puporev · 12.04.2012, 08:05

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
uses crt;
const n=8;
var a:array[1..n+1,1..n] of integer;
    i,j,k:byte;
    mx,x:integer;
begin
clrscr;
randomize;
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(50);
{находим макс. в столбцах}
for j:=1 to n do
 begin
  mx:=a[1,j];
  for i:=1 to n do
  if a[i,j]>mx then mx:=a[i,j];
  a[n+1,j]:=mx;{и записываем в дополнительную строку}
 end;
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  write(' ':6);{5 пробелов в начале строки}
  for j:=1 to n do
  write(a[i,j]:4);{элементы строки}
  writeln;
 end;
writeln;
write('Макс. ');{дополнительная строка с суммами}
for j:=1 to n do
write(a[n+1,j]:4);
writeln;
writeln;
{перестановка столбцов по возрастанию значений в последней строке}
for j:=1 to n-1 do
for k:=j+1 to n do
if a[n+1,j]>a[n+1,k] then
for i:=1 to n+1 do
 begin
  x:=a[i,j];
  a[i,j]:=a[i,k];
  a[i,k]:=x;
 end;
writeln('Столбцы упорядочены:');
for i:=1 to n do
 begin
  write(' ':6);
  for j:=1 to n do
  write(a[i,j]:4);
  writeln;
 end;
writeln;
write('Макс. ');
for j:=1 to n do
write(a[n+1,j]:4);
readln
end.

Новые блоги и статьи Все статьи Все блоги /
Как использовать OAuth2 со Spring Security в Java Javaican 14.05.2025 Протокол OAuth2 часто путают с механизмами аутентификации, хотя по сути это протокол авторизации. Представьте, что вместо передачи ключей от всего дома вашему другу, который пришёл полить цветы, вы. . .	Анализ текста на Python с NLTK и Spacy AI_Generated 14.05.2025 NLTK, старожил в мире обработки естественного языка на Python, содержит богатейшую коллекцию алгоритмов и готовых моделей. Эта библиотека отлично подходит для образовательных целей и. . .	Реализация DI в PHP Jason-Webb 13.05.2025 Когда я начинал писать свой первый крупный PHP-проект, моя архитектура напоминала запутаный клубок спагетти. Классы создавали другие классы внутри себя, зависимости жостко прописывались в коде, а о. . .	Обработка изображений в реальном времени на C# с OpenCV stackOverflow 13.05.2025 Объединение библиотеки компьютерного зрения OpenCV с современным языком программирования C# создаёт симбиоз, который открывает доступ к впечатляющему набору возможностей. Ключевое преимущество этого. . .	POCO, ACE, Loki и другие продвинутые C++ библиотеки NullReferenced 13.05.2025 В C++ разработки существует такое обилие библиотек, что порой кажется, будто ты заблудился в дремучем лесу. И среди этого многообразия POCO (Portable Components) – как маяк для тех, кто ищет. . .
Паттерны проектирования GoF на C# UnmanagedCoder 13.05.2025 Вы наверняка сталкивались с ситуациями, когда код разрастается до неприличных размеров, а его поддержка становится настоящим испытанием. Именно в такие моменты на помощь приходят паттерны Gang of. . .	Создаем CLI приложение на Python с Prompt Toolkit py-thonny 13.05.2025 Современные командные интерфейсы давно перестали быть черно-белыми текстовыми программами, которые многие помнят по старым операционным системам. CLI сегодня – это мощные, интуитивные и даже. . .	Конвейеры ETL с Apache Airflow и Python AI_Generated 13.05.2025 ETL-конвейеры – это набор процессов, отвечающих за извлечение данных из различных источников (Extract), их преобразование в нужный формат (Transform) и загрузку в целевое хранилище (Load). . . .	Выполнение асинхронных задач в Python с asyncio py-thonny 12.05.2025 Современный мир программирования похож на оживлённый мегаполис – тысячи процессов одновременно требуют внимания, ресурсов и времени. В этих джунглях операций возникают ситуации, когда программа. . .	Работа с gRPC сервисами на C# UnmanagedCoder 12.05.2025 gRPC (Google Remote Procedure Call) — открытый высокопроизводительный RPC-фреймворк, изначально разработанный компанией Google. Он отличается от традиционых REST-сервисов как минимум тем, что. . .

Olenka

	Расставить столбцы в порядке возрастания 12.04.2012, 01:12. Показов 1297. Ответов 1 Метки нет (Все метки) Помогите, пожалуйста решить задачу: в массиве 8 на 8 целого типа, расставить столбцы в порядке возрастания максимальных элементов в них

Опции темы

Расставить столбцы в порядке возрастания

Решение