| 比赛 | 20120707 | 评测结果 | AWWWWAAWWW |
|---|---|---|---|
| 题目名称 | 表达式游戏 | 最终得分 | 30 |
| 用户昵称 | zhangchi | 运行时间 | 0.003 s |
| 代码语言 | Pascal | 内存使用 | 0.17 MiB |
| 提交时间 | 2012-07-07 09:34:23 | ||
var
i,ans:longint;
s:ansistring;
a:array[chr(1)..chr(255)] of longint;
begin
assign(input,'expression.in'); reset(input);
assign(output,'expression.out'); rewrite(output);
readln(s);
for i:=1 to length(s) do
inc(a[s[i]]);
for i:=1 to 255 do
if a[chr(i)]>0 then inc(ans);
writeln(ans);
close(input); close(output);
end.