{
    Решение избранных задач
    © 2024 Слинкин Д.А., GNU LGPLv3

 **********************************************************************}

{$mode objfpc}
var ingr:string='SPCEM'; // список правильных ингридиентов
    result:array[1..5]of integer=(0,0,0,0,0); // количество правильных ингридиентов
    count,i,p,min:integer;
    c:char;
begin
 readln(count);
 for i:=1 to count do begin
  read(c);
  // ищем очередной ингридиент
  p:=pos(c,ingr);
  // увеличиваем количество, если ингридиент правильный
  if p>0 then inc(result[p]);
 end;
 // находим правильный ингридент с минимальным кол-вом
 min:=result[1];
 for i:=2 to 5 do
    if result[i]<min then min:=result[i];
 writeln(min*5); // выводим число салатов
end.