Есть ответ 👍

Какое минимальное число бит на символ надо выделить в памяти, если требуется использовать не менее 30 символов одновременно?

197
394
Посмотреть ответы 1

Ответы на вопрос:

Amina1225
4,5(46 оценок)

Var used: set of char;       s: string;       i, cnt: integer;       c: char; begin used : = []; 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.

Популярно: Информатика