Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
Agent_147
2 / 2 / 1
Регистрация: 10.04.2011
Сообщений: 35
1

В текстовом файле отсортировать строки по возрастанию их длин

09.06.2011, 11:33. Просмотров 1098. Ответов 4
Метки нет (Все метки)

В текстовом файле отсортировать строки по возрастанию их длин... Delphi - это печально как то)))

Добавлено через 31 минуту
Ай да ладно и так всё шоколадно)))
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.06.2011, 11:33
Ответы с готовыми решениями:

Отсортировать строки матрицы по возрастанию максимальных элементов каждой строки
Дана целочисленная квадратная матрица А порядка N. Отсортировать строки матрицы по возрастанию...

В текстовом файле отсортировать строки по возрастанию их длин.
В текстовом файле отсортировать строки по возрастанию их длин.

Отсортировать элементы по возрастанию длин их строки
нужна помощь в сортировке на яве. Мне надо отсортировать элементы по возрастанию длин их строки

Отсортировать слова по возрастанию длин
Написать программу, заранее спасибо Задан текст, состоящий из слов, записанных через запятые и/или...

Сформировать гистограмму длин слов, хранящихся в текстовом файле
помогите с этим заданием !!!..... Сформировать гистограмму длин слов, хранящихся в текстовом...

4
SystemX
39 / 39 / 18
Регистрация: 11.05.2011
Сообщений: 199
09.06.2011, 12:07 2
кидаешь на форму tmemo.
memo1.loadfromfiles('имяфайла.txt');
затем
memo1.lines.count - кол-во строк
length(memo1.lines[i]) - количество символов в строке i
ну а алгоритм сортировки думаю знаешь
1
MsGuns
552 / 549 / 60
Регистрация: 04.04.2011
Сообщений: 2,052
09.06.2011, 12:41 3
TMemo для этого не нужна - хватит и TStringList (TStrings)
0
SystemX
39 / 39 / 18
Регистрация: 11.05.2011
Сообщений: 199
09.06.2011, 12:54 4
это просто пример, а
Agent_147, уже думаю разберется
0
Mawrat
12880 / 5782 / 1704
Регистрация: 19.09.2009
Сообщений: 8,807
09.06.2011, 12:54 5
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Продолжая в направлении, которое SystemX и MsGuns предложили:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
procedure TForm1.Button1Click(Sender: TObject);
var
  Sl : TStringList;
  Od : TOpenDialog;
begin
  Od := OpenDialog1;
  if not Od.Execute then Exit;
 
  Sl := TStringList.Create;
  Sl.LoadFromFile(Od.FileName);
  //Сортировка строк в направлении по неубыванию (по возрастанию).
  Sl.Sort;
  Sl.SaveToFile(Od.FileName);
 
  Sl.Free;
end;
0
09.06.2011, 12:54
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.06.2011, 12:54

(Массивы слов, строк) Выделить из текста слова, содержащие попарно различные буквы, отсортировать их по возрастанию их длин.
Строка текста - слова, пробелы, знаки препинания. Текст размещен в одной или нескольких строках без...

Удалить в текстовом файле 1.txt все строки, которые встречаются в текстовом файле 2.txt
например имеется текстовый файл 1.txt c таким содержанием 111 222 333 444 555 и имеется...

Отсортировать слова строки по неубыванию их длин
Вам дана строка S, состоящая только из пробелов и строчных латинских букв. Строка представляет из...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.