记录编号	169041	评测结果	AAAAAAAAAA
题目名称	牛	最终得分	100
用户昵称	甘罗	是否通过	通过
代码语言	Pascal	运行时间	0.005 s
提交时间	2015-07-07 16:47:16	内存使用	0.17 MiB

program zht;
var
bj,n,i,j,g,p,q:longint;
ans:int64;
z:ansistring;
begin
assign(input,'cowa.in');
assign(output,'cowa.out');
reset(input);
rewrite(output);
readln(n);
readln(z);
for i:=1 to n do
begin
if z[i]='O' then begin
 for j:=1 to i do
 if z[j]='C' then p:=p+1;
 for g:=i+1 to n do
 if z[g]='W' then q:=q+1;
 ans:=ans+p*q;
 bj:=i+1;
 break;
 end;
end;
for i:=bj to n do
begin
if z[i]='C' then p:=p+1;
if z[i]='W' then q:=q-1;
if z[i]='O' then ans:=ans+p*q;
end;
writeln(ans);
close(input);
close(output);
end.