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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.04.2011, 09:22   #1
recerpascal
 
Регистрация: 24.09.2010
Сообщений: 4
По умолчанию Паскаль. Сортировка

Задачка на паскале по сортировке выбором. Надо записать в файл двухмерный масив, типа integer , отсортировать елементы отдельно в каждой строке в порядке спадания цифр. Метод сортировки - выбором

Последний раз редактировалось recerpascal; 19.04.2011 в 09:28.
recerpascal вне форума Ответить с цитированием
Старый 19.04.2011, 16:09   #2
Gelirgwenn
Пользователь
 
Регистрация: 18.04.2011
Сообщений: 14
По умолчанию

Код:
program a1;
const
m=3; //строки
n=5; //столбцы
namefile='C:\Massiv.txt'; //путь к файлу
var
i,j,k: integer; //счетчики
max,jmax: integer; //максимальное число в строке и номер его столбца
a: array [0..m,0..n] of integer; //сам массив
f:text; //файловая переменная
begin
// заполняешь массив (я думаю напишешь код самостоятельно)
// сортировка массива
for i:=0 to m do
    for k:=0 to n-1 do
        begin
        max:=0;
        for j:=k to n do
            if a[i][j]>max then
               begin
               max:=a[i][j];
               jmax:=j;
               end;
        a[i][jmax]:=a[i][k];
        a[i][k]:=max;
        end;
//записываем отсортированный массив в файл
assign(f,namefile);
rewrite(f);
for i:=0 to m do
    begin
    for j:=0 to n do
        write (f,' ',a[i][j]);
    writeln(f);
    end;
close(f);
end.
Успехов
Gelirgwenn вне форума Ответить с цитированием
Старый 19.04.2011, 18:47   #3
recerpascal
 
Регистрация: 24.09.2010
Сообщений: 4
По умолчанию

спс, ето разве сортирует каждую строку??
recerpascal вне форума Ответить с цитированием
Старый 20.04.2011, 00:42   #4
Gelirgwenn
Пользователь
 
Регистрация: 18.04.2011
Сообщений: 14
По умолчанию

да, первый for пересчитывает строки, а два других сортируют элементы при постоянном m (т.е. строке, задаваемой первым for), и изменяемом j (столбце).
З.Ы. пожалста
Gelirgwenn вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль, Борланд Паскаль-в чем разница??? Vremya-Dengy Паскаль, Turbo Pascal, PascalABC.NET 13 31.05.2011 18:23
Паскаль Twisti Помощь студентам 2 18.12.2010 20:05