Поможитэ, люди добры, решить задачу по Турбо Паскалю
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
Поможитэ, люди добры, решить задачу по Турбо Паскалю - 2004-09-02 16:54:03
|
|
|
MiG
Сообщений: 3
Оценки: 0
Присоединился: 2004-08-20 11:05:59
|
Привет всем! Хелп ми, плиз! (У меня препод су..ровый человек) Как решить следующую задачу (я не бум-бум).: Найти в текстовом файле наибольшую по кол-ву группу слов-анаграм (это слова, получаемые одно из другого перестановкой ьукв, например: автор, отвар, товар). В группе следует учитывать только различные слова.
|
|
|
|
|
Поможитэ, люди добры, решить задачу по Турбо Паскалю - 2004-09-02 17:52:56
|
|
|
Maker
Сообщений: 647
Оценки: 0
Присоединился: 2004-03-11 18:50:32
|
Простая такая прога…
var t: text;
s: string;
begin
assign(t,'имя файла');
reset (t);
while not EoF(t) do begin
readln(t,s);
{здесь идет выделение и обработка слов}
end;
close(t);
end;
Остальное - пиши ПМ договоримся. Недорого.
|
|
|
|
|
|
