# 标题统计【水】（本蒟蒻都做的出来）
## 题目链接：https://www.luogu.org/problemnew/show/P5015
本题其实P比C好打很多，因为P有一个神奇的东西：readln，省去判断结束的麻烦。题目说输入只有一行，所以换行符只有可能在末尾出现，有了readln，就与换行符没有半毛钱关系了。然后，我们只要判断空格就好了。
## 本蒟蒻亲测2ms可以过。
## AC代码：
```pascal
var
str:string;
s,i:longint;
begin
readln(str);
s:=length(str);
for i:=1 to length(str) do
if (str[i]=' ') then dec(s);
writeln(s);
end.
```