Напишите программу, которая определяет количество различных символов, встречающихся в символьной строке. Входные данные На вход программы подаётся символьная строка. Выходные данные Программа должна вывести количество различных символов в этой строке. Примеры входные данные aB122AB выходные данные 5 Pascal ABC 1.8

Ответы:

Милослава Власова

11-06-2010 15:43

var used: Set of Char; s: string; i, cnt: integer; c: char;beginused := [];readln(s);for i := 1 to length(s) do include(used, s[i]);cnt := 0;for c := #0 to #255 do if (c in used) then cnt := cnt + 1;writeln(cnt);end.

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Напишите программу, которая определяет количество различных символов, встречающихся в символьной строке. Входные данные На вход программы подаётся символьная строка. Выходные данные Программа должна вывести количество различных символов в этой строке. Примеры входные данные aB122AB выходные данные 5 Pascal ABC 1.8» от пользователя Petr Tereschenko в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!