Метелики

Петрик наловив у бабусі в садочку N метеликів, кожен з яких має свою назву a,b,c,…z. Усі метелики дуже красиві, але Петрику найбільше подобаються метелики a, b та c. Допоможіть Петрику порахувати кількість метеликів кожного з найкрасивіших видів.

Вхідні дані

Перший рядок вхідного файлу містить число N  – кількість метеликів, яку спіймав Петрик. Другий рядок містить N маленьких латинських літер – назви метеликів, які здавив Петрик.

Вихідні дані

У вихідний файл потрібно вивести три числа: кількість метеликів виду a, b та c, які упіймав Петрик.

but.in	but.out
8 сbbebdaz	1 3 1

program metelk; var N,I:integer; S:string; A,B,C: integer; begin Assign (input,'input.txt'); Reset (input); readln (N); readln (S); A:=0; B:=0; C:=0; for I:=1 to N do begin if S[i]='a' then A:=A+1; if S[i]='b' then B:=B+1; if S[i]='c' then C:=C+1; end; Assign (output,'output.txt'); Rewrite(output); Write (A,' ',B,' ',C); Close (input); Close (output); end.