Строки и множества. Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу

@konispat · Регистрация: 25.12.2011

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

1.Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу
2.Проиллюстрировать справедливость соотношений А \ В \ С = (А \ В) & (А \ С). :dontknow:

Добавлено через 18 часов 44 минуты
помогите пожалуста

@КонецСвета · 05.04.2012, 19:32

Сообщение от konispat

1.Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу

может, это поможет...

@konispat · 05.04.2012, 20:51 **[ТС]**

КонецСвета,

Pascal

uses crt;
var s: string;
    i,j,k: integer;
    
begin
write('s=');
readln(s);
for i:=1 to length(s) do
    if s[i] in ['а','б'..'ю','я'] then
       begin
       k:=0;
       for j:=1 to length(s) do
           if s[i]=s[j] then inc(k);
       if k=1 then
        write(s[i]);
       end;
end.

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

@КонецСвета · 06.04.2012, 00:00

konispat,

Pascal

uses crt;
var s: string;
    i,j,k: integer;
    p:set of char;
 
begin
write('s=');
readln(s);
p:=[];
for i:=1 to length(s) do
    if s[i] in ['а'..'я'] then
       begin
       k:=0;
       for j:=1 to length(s) do
           if s[i]=s[j] then inc(k);
       if k=1 then p:=p+[s[i]];
       end;
for i:=224 to 255 do
    if chr(i) in p then write(chr(i));
end.

@konispat · 06.04.2012, 08:52 **[ТС]**

КонецСвета, спасибо) вторую задачу реально решить? первый раз с таким встречаюсь

@konispat 2 / 2 / 2 Регистрация: 25.12.2011 Сообщений: 55
		1
	Строки и множества. Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу 05.04.2012, 14:27. Показов 3104. Ответов 4 Метки нет (Все метки) 1.Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу 2.Проиллюстрировать справедливость соотношений А \ В \ С = (А \ В) & (А \ С). :dontknow: Добавлено через 18 часов 44 минуты помогите пожалуста 0

@КонецСвета Почетный модератор 7966 / 3937 / 2464 Регистрация: 30.10.2011 Сообщений: 5,377
	05.04.2012, 19:32	2
	Сообщение от konispat 1.Вывести в алфавитном порядке все буквы текста, входящие в него по одному разу может, это поможет... 0

@konispat 2 / 2 / 2 Регистрация: 25.12.2011 Сообщений: 55
	06.04.2012, 08:52 [ТС]	5
	КонецСвета, спасибо) вторую задачу реально решить? первый раз с таким встречаюсь 0

Опции темы