Помощь - Поиск - Пользователи - Календарь
Полная версия: Задача на строки
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
kirilinho
Помогите решить задачу.
В строке из 50 символов отдельные слова разделены пробелом. Упорядочить строку так, чтобы каждое следующее слово было не короче предыдущего.

program lab_6;
uses crt;
const l=50;
var s,s1:string[50];
i,j,k:integer;
c:char;
begin
s:='';
for i:=1 to l do
begin
readln©;
s:=s+i;
end;
???
end.
Артемий
В этом разделе смотри тему Разделение на слова.Все способы.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.