Паскаль.Введите с клавиатуры символьную строку и выведите все символы,которые встречаются в ней один только раз.Заранее спасибо.
Var s: string;
ch: char;
begin
write(строка: ); readln(s);
foreach ch in s.Sorted.Distinct do write(ch, );
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
