задача на фортране легкая

[ludman]

легенькая задача следующего содержания помогите пожалуста.

Переставить слова в тексте так, чтобы они были упорядочены по длине.

Читал на вашем форуме нашел на эту задачу на паскале, но так и не смог перевести.

Изменено 23 февраля, 2012 пользователем ludman

[Teddy_Bear]

Какой фортран? В старых версиях функций работы со строковой переменной кот наплакал. Как бы с указателями не пришлось заморачиваться.

Общая идея

- нарезать на слова по признаку пробела в цикле и поместить в массив. (Если уже есть функция вырезания подстроки из строки).

- пузырьковым методом упорядочить массив по длине len или length.

- склеить в строку через пробел.

Код по выставлению версии фортрана.

[ludman]

77-ой

идея понятна ща попробую че-нить сделать

спасибо

Изменено 23 февраля, 2012 пользователем ludman