Паскаль.Введите с клавиатуры символьную строку и выведите все символы,которые встречаются в ней один только раз.Заранее спасибо.
Паскаль.Введите с клавиатуры символьную строку и выведите все символы,которые встречаются в ней один только раз.Заранее спасибо.
Ответ(ы) на вопрос:
var s: string;
ch: char;
begin
write('строка: '); readln(s);
foreach ch in s.Sorted.Distinct do write(ch,' ');
end.
Не нашли ответ?
Похожие вопросы