Пароль состоит из 6 символов .из исходной записи school555inform удалить все повторяющиеся символы,а затем все символы ,начиная с седьмого(т.е оставить первые 6 символов)
Смотря в какой кодировке. Если кодировка КОИ-8, значит один символ кодируется, то есть весит 8 бит. И так всегда. Значит: 2000символов×8бит=16000бит=16000:8=2000байта(так как что бы перевести биты в байты, нужно разделить кол-во битов на 8, а что бы перевести в килобайты, нужно ещё разделить и на 1024).Но тут в килобайты перевести нельзя. Невозможно. размер сообщения в кодировке КОИ-8. Если же кодировка Unicode, то это значит, что один символ кодируется, то есть весит 16 бит. Значит: 2000символов×16бит=32000бит=32000:8=4000байт. Как и в первом случае, перевести тут в килобайты нельзя. Невозможно. размер сообщения в кодировке Unicode.
begin
var s:='SCHOOL555INFORM';
Writeln('Пароль: ',s.Distinct.Take(6).JoinIntoString(''))
end.
Результат выполнения программы:
Пароль: SCHOL5