"Дана последовательность, содержащая от 2 до 50 слов, в каждом из которых от 1 до 8 строчных латинских букв; между соседними словами – пробел, за последним словом – точка. Вывести те слова последовательности, у которых буквы упорядочены по алфавиту."Есть код,но он не работает.Прошу объяснить что я делаю не так.Язык-Паскаль.uses crt;varc,i,j:integer;text,st:string;beginc:=0;clrscr;writeln('vvedite text:');readln(text);for i:=0 to length(text) doif (text[i]=' ') or (text[i]='.') thenbeginst:=copy(text,0,i);delete(text,0,i+1);writeln('text=',text);end;for j:=0 to length(st) dobeginif pos(st[j],st)c:=c+1;if c=length(st) thenwriteln(st);st:='';end;readln;end.readln;end.