Работа с символьными цепочками

[antakov87]

либо я чайник, либо что, скорей всего первое но никак не могу сообразить как написать прогу,до этого сделал можно сказать с легкостью два задания в паскаль а щас клинонуло.нужно ввести произвольную символьную цепочку. отсортировать ее символы в порядке неубывания (по алфавиту), вывести отсортированную цепочку и подсчитать число символов, совпадающих с последним символом. если кто делал подскажите студенту.

[Niro]

подскажите

Подсказываю.
Закиньте или записывайте сразу вашу цепочку символов в массив символов и просто сортируйте его, как вам нужно, для это используйте числовой код символов, благо он (цифровой код) увеличивается в соответсвии с алфавитом, используйте функцию ord(символ), а затем выведите её

[VadikV]

Символьная цепочка это и есть массив символов. Поэтому просто введите строку с клавиатуры и дальше работайте с ней, как с массивом символов по длине строки

[antakov87]

uses crt;

var s:string;

i,n:byte;

begin

clrscr;

write('Vvedite proizvolny nabor simvolov:');

readln(s);

[antakov87]

uses crt;

var s:string;

i,n:byte;

begin

clrscr;

write('Vvedite proizvolny nabor simvolov:');

readln(s);

[Vanta11a]

Вот вы её считали. Теперь можно работать с ней как с массивом символов, размерностью 1..length(s), где length(s) - функция, возвращающая длину строки. Для этого массива реализуете любой из алгоритмов сортировки (метод пузырька, например).