Операции над строками. Вывести все буквы, встречающиеся в строке, в алфавитном порядке

@Irina93 · Регистрация: 12.04.2012

Author24 — интернет-сервис помощи студентам

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

@КонецСвета · 25.04.2012, 19:12

как один из вариантов... если не подходит, уточни, какие процедуры и функции можно использовать...

Pascal

uses crt;
var s: string;
    i: byte;
begin
write('s='); readln(s);
for i:=1 to 255 do
    if (pos(chr(i),s)<>0)
       and (chr(i) in ['A'..'Z','a'..'z','А'..'Я','а'..'я'])
           then write(chr(i),' ');
readln;
end.

@Irina93 0 / 0 / 0 Регистрация: 12.04.2012 Сообщений: 20
		1
	Операции над строками. Вывести все буквы, встречающиеся в строке, в алфавитном порядке 25.04.2012, 14:53. Показов 1317. Ответов 1 Метки нет (Все метки) Пользователь вводит с клавиатуры строку,программа выводит на экран все буквы , встречающиеся в строке в алфавитном порядке. 0

	25.04.2012, 19:12

Опции темы

Операции над строками. Вывести все буквы, встречающиеся в строке, в алфавитном порядке

Решение