统计变量
背景
某日，先知突然命令他儿子magina完成一个任务：统计一个程序中的全程变量有多少，maina不愧是先知的儿子，10分钟就把程序编好了，下面他让你来做这道题。。。。
描述
统计一个程序中的全程变量的个数，程序中不含有过程名和函数名。
格式
输入格式
输入一个程序。
输出格式
输出只有一行，输出变量的个数。
样例1
样例输入1
var
i,j:longint;
begin
readln(i,j);
writeln(i+j);
end.
样例输出1
2
限制
1s
提示
【数据范围】
1 ≤ 一行的长度≤ 200。
1 ≤ 程序的行数≤ 2,000。
so easy~
来源
magina原创
