0 / 0 / 0
Регистрация: 11.04.2015
Сообщений: 3
1

Сортировка методом Шелла списка студентов группы

19.04.2015, 16:16. Показов 1204. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Доброго времени суток, нужно написать программу для сортировки методом Шелла массива, состоящий из студентов группы (25 человек) (расположенных в массиве произвольно), по возрастанию, считая, что a=1, б=2, в=3, ...я=33 и т.д.
Я пытался сделать программу данным способом, но если вводить имена и фамилии студентов с маленькой буквы, программа после сортировки отправит их в конец. Нужно чтобы, он сортировал по алфавиту несмотря на размер букв.
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
var
  f1: text;
  str, x: string[255];
  i, j, k: byte;
  a:char;
  f: boolean;
  arr,mas: array[1..50] of string;
 
begin
  writeln('Данная программа сортирует по алфавиту методом Шелла буквы имени и фамилии');
  writeln('Введите название файла для обработки: ');
  writeln('Вводите название файла вместе с расширением .txt');
  
  repeat
    f := true;
    readln(str);
    f := FileExists(str);      
    if not f then writeln('Файл не найден. Повторите ввод');
  until f;
  
  assign(f1, str);
  reset(f1);
  while(not eof (f1)) do 
  begin
    inc(k);
    readln(f1, arr[k]);
  end;
   
    for i := 2 to k do
    begin
      x := mas[i];
      j := i - 1;
      while (j >= 1) and (x < mas[j]) do 
      begin
        mas[j + 1] := mas[j];
        j := j - 1;
      end;
      mas[j + 1] := x;     
    end;
 
  
  writeln;
  Writeln('Отсортированные данные:');
  for i := 1 to k do writeln(mas[i]);
  writeln;
  readln;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.04.2015, 16:16
Ответы с готовыми решениями:

Сортировка методом Шелла
Первую четверть массива упорядочить по возрастанию, последнюю по убыванию. Найти наименьший элемент...

Сортировка методом Шелла
Нужно написать програму для сортировки масива N чисел методом Шелла.

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

Сортировка методом Шелла
Срочно нужно! Ввести массивы А и В. В массив С перенести четные элементы массива А, и...

3
Модератор
9905 / 5263 / 3318
Регистрация: 17.08.2012
Сообщений: 16,084
20.04.2015, 00:54 2
Проверьте, поддерживает ли Ваш диалект паскаля функцию upcase. Если нет - напишите эту функцию сами, и сортируйте данные, приведённые к одному регистру. Можно использовать дополнительную переменную, чтобы не изменять вид основных данных.
0
0 / 0 / 0
Регистрация: 11.04.2015
Сообщений: 3
20.04.2015, 19:30  [ТС] 3
Вот фрагмент с upcase. Я отсортирую массив.
Но как мне вернуться назад к заданным данным, при этом оставляя сортировку?
Если буду использовать lowcase, то все буквы будут маленькими.
Pascal
1
2
3
4
5
6
for i:=1 to k do
 begin
  mas[i]:='';
  for j:=1 to length(arr[i]) do
  mas[i]:=mas[i]+Upcase(arr[i][j]);
 end;
0
Модератор
9905 / 5263 / 3318
Регистрация: 17.08.2012
Сообщений: 16,084
20.04.2015, 19:51 4
Цитата Сообщение от Korket Посмотреть сообщение
как мне вернуться назад к заданным данным
А Вы их и не меняйте. Копируйте имена и фамилии в промежуточные переменные, с ними сотворяйте upcase или lowcase, что Вам больше по душе, и в зависимости от результата сравнения сортируйте данные. Пример для символов, для упрощения:
Pascal
1
2
3
4
5
6
7
8
9
10
a := m[i];
b := m[j];
a := upcase(a);
b := upcase(b);
if a > b
  then begin
    t := m[i];
    m[i] := m[j];
    m[j] := t
  end;
Как видите, сортировку делаем независимо от регистра, а данные в массиве не изменяем.
0
20.04.2015, 19:51
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.04.2015, 19:51
Помогаю со студенческими работами здесь

Сортировка массива методом Шелла
Доброго времени суток))) Нужна срочная помощ в написании сортировки массива методом...

Сортировка случайных чисел методом Шелла
Выполнить сортировку одномерного массива А случайных целых чисел по возрастанию методом Шелла....

Опишите тип записи - сведения о студенте группы. Сформируйте файл студентов своей группы.
Опишите тип записи - сведения о студенте группы, необходимые декану факультета. Сформируйте файл...

Сортировки методом выбора и методом Шелла
Создать одномерный массив, который состоит из n элементов. После этого первую четверть упорядочить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru