Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.12.2013, 19:11   #1
adaptes
Пользователь
 
Регистрация: 04.12.2013
Сообщений: 25
По умолчанию Двумерный массив, помогите пожалуйста!

помогите пожалуйста объяснить вот эти строчки (подробно, если можно)
Код:
for j:=1 to n do begin
 for i:=1 to n-1 do begin
  for k:=1 to n-1 do
   if mas[k,j]<mas[k+1,j] then begin
    l:=mas[k+1,j];
    mas[k+1,j]:=mas[k,j];
    mas[k,j]:=l;
adaptes вне форума Ответить с цитированием
Старый 22.12.2013, 19:17   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Начинаем цикл от 1 до последней строки
for j:=1 to n do begin
И внутренний цикл от первой колонки до предпоследней
for i:=1 to n-1 do begin
Для сортировки делаем двойной проход по каждой строке
for k:=1 to n-1 do
Если очередной элемент менее текущего
if mas[k,j]<mas[k+1,j] then begin
Сортировкой пузырьком его перемещаем меняя элементы местами
l:=mas[k+1,j];
mas[k+1,j]:=mas[k,j];
mas[k,j]:=l;
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.12.2013, 19:22   #3
adaptes
Пользователь
 
Регистрация: 04.12.2013
Сообщений: 25
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Начинаем цикл от 1 до последней строки
for j:=1 to n do begin
И внутренний цикл от первой колонки до предпоследней
for i:=1 to n-1 do begin
Для сортировки делаем двойной проход по каждой строке
for k:=1 to n-1 do
Если очередной элемент менее текущего
if mas[k,j]<mas[k+1,j] then begin
Сортировкой пузырьком его перемещаем меняя элементы местами
l:=mas[k+1,j];
mas[k+1,j]:=mas[k,j];
mas[k,j]:=l;
а объясните пожалуйста, что такое "K"
adaptes вне форума Ответить с цитированием
Старый 22.12.2013, 19:26   #4
Smitt&Wesson
Старожил
 
Аватар для Smitt&Wesson
 
Регистрация: 31.05.2010
Сообщений: 13,543
По умолчанию

Цитата:
Сообщение от adaptes Посмотреть сообщение
а объясните пожалуйста, что такое "K"
Переменная.
Пиши пьяным, редактируй трезвым.
Справочник по алгоритмам С++ Builder
Smitt&Wesson вне форума Ответить с цитированием
Старый 22.12.2013, 19:36   #5
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А я думал что код написал автор. Наивный.... О_о
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.12.2013, 19:43   #6
adaptes
Пользователь
 
Регистрация: 04.12.2013
Сообщений: 25
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
А я думал что код написал автор. Наивный.... О_о
если бы его написал я, то я бы его не просил объяснять))
adaptes вне форума Ответить с цитированием
Старый 22.12.2013, 20:32   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Тогда я тебя разочарую - он неправильный
А вот что не хватает придется выяснять тебе
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.12.2013, 20:34   #8
adaptes
Пользователь
 
Регистрация: 04.12.2013
Сообщений: 25
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Тогда я тебя разочарую - он неправильный
А вот что не хватает придется выяснять тебе
он правильный, потому что работает
adaptes вне форума Ответить с цитированием
Старый 22.12.2013, 20:39   #9
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
потому что работает
Ну что ж. В таком случае не буду мешать )
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Двумерный массив, помогите пожалуйста! adaptes Помощь студентам 3 06.12.2013 22:30
Двумерный массив! Помогите пожалуйста! Naaat Паскаль, Turbo Pascal, PascalABC.NET 1 04.06.2009 13:45