Пароль состоит из 6 символов .из исходной записи school555inform удалить все повторяющиеся символы,а затем все символы ,начиная с седьмого(т.е оставить первые 6 символов)

// PascalABC.NET 3.0, сборка 1076
begin
  var s:='SCHOOL555INFORM';
  Writeln('Пароль: ',s.Distinct.Take(6).JoinIntoString(''))
end.

Результат выполнения программы:
Пароль: SCHOL5