СКОПИРУЙТЕ ССЫЛКУ И ВСТАВЬТЕ В СТРОКУ БРАУЗЕРА, В ССЫЛКАХ ЗАДАНИЯ
1 https://prnt.sc/skm1bn
2 https://prnt.sc/skm22p
3 https://prnt.sc/skm2pq
4 https://prnt.sc/skm2wq
5 https://prnt.sc/skm3dm
6 https://prnt.sc/skm3oi

Var
  c: set of char;
  i, n: integer;
  s: string;

begin
  c := [];
  write('Введите текст: ');
  readln(s);
  n := 0;
  for i := 1 to length(s) do
    if not (s[i] in c) then
    begin
      include(c, s[i]);
      n := n + 1
    end;
  writeln('Мощность алфавита, использованного для строки, равна ', n)
end.

Тестовый прогон:

Введите текст: В чащах юга жил бы фикус? Да, но фальшивый экземпляр...!
Мощность алфавита, использованного для строки, равна 35

Введите текст: Pi:=3.14159265; D:=Pi*sqr(D)/4;
Мощность алфавита, использованного для строки, равна 22

От чего зависит производительность жёстких дисков? - От скорости вращения шпинделя. Объема кэш памяти. Механизмов движеня головок.Устройства размещаемые на материнской плате?- Процессор, память, слоты, штекеры, батарейки, радио электронные компоненты, датчики, вентиляторы, радиаторы.Компилятор,транслятор,отладчик- это?- Средства разработки и тестирования приложений для разработчиков. Слово транслятор очень устаревшее, только в школе его упоменают.Какие вопросы решают операционная система?- Массовое привлечение неопытных пользователей в мир ПК. Распределение ресурсов ПК для программ.Программы,работающие в момент включения компьютера- Аппаратные тестовые программы. загрузчики. запуск ОС.