Определите, сколько в строке символов, которые встречаются только 1 раз?язык...

Question

Определите, сколько в строке символов, которые встречаются только 1 раз?язык программирования pascal abc.net

Comments

подробние

---

Формат входных данныхНа вход подается строка длиной менее 255 символов, содержащая латинские буквы и цифрыФормат выходных данныхКоличество символов, которые встречаются в строке только 1 раз

---

Т.е. не проверять, есть ли символы, отличные от латинских цифр и букв, считая что таких символов нет, или если они есть, то игнорировать их?

---

Я не совсем понял,ну вот пример: ввод aBc134 вывод 6

Answer 1

var c: integer; b: boolean; begin b := true; var s := readstring(); for var i := 1 to s.Length do begin for var j := 1 to s.Length do begin if (s[i] = s[j]) and (i <> j) then begin b := false;break; end else end; if (b = true) then c := c + 1; b := true; end; write(c); end.

Comments

Это не ответ

---

Это неверное решение. Не учтено, что надо отобрать только те символы, которые "встречаются только 1 раз"

---

А так программа вполне работоспособна. Если Вы чего-то не знаете, то это вовсе не означает, что написано неверно.

---

Да, я не понимаю обрывки кода

---

var
c: integer;
b: boolean;

begin
b := true;
var s := readstring();
for var i := 1 to s.Length do
begin
for var j := 1 to s.Length do
begin
if (s[i] = s[j]) and (i <> j) then
begin b := false;break; end
else
end;
if (b = true) then c := c + 1;
b := true;
end;
write(c);
end.

---

Если Вы не понимаете кода, то это Ваши проблемы. Вы указали язык PascalABC.Net. Это современный и очень развитый язык, на котором можно писать совершенно по-разному. Если Вы хотите сузить круг возможностей, то и указывайте, что нужно использовать только подмножество языка, совместимое, к примеру, с Pascal ABC или Free Pascal.

---

А так, как в Вашем примере выше, на PascalABC.Net уже давно не пишут. На это прямо указывают разработчики этой версии языка.

---

"PascalABC.NET 2015-2016 меняет стиль решения ряда задач. Код становится более простым, понятным, легче пишется и меняется.
Богатый набор стандартных классов -
коллекций существенно расширяет набор простых задач, которые можно решать на PascalABC.NET.
Методы, встроенные в символы, строки, текстовые файлы, позволяют в несколько раз сократить решения, связанные с обработкой текстовой информации."