拯救OIBH总部

拯救OIBH总部
Time Limit:1000MS Memory Limit:65536K
Total Submit:283 Accepted:77

Description
背景 Background
OIBH总部突然被水淹没了！现在OIBH需要你的救援……
描述 Description
OIBH被突来的洪水淹没了>.<还好OIBH总部有在某些重要的地方起一些围墙，用号表示，而一个封闭的号区域洪水是进不去的……现在给出OIBH的围墙建设图，问OIBH总部没被淹到的重要区域（由”0”表示）有多少。

Input
输入格式 Input Format
第一行是两个数，x和y（x,y<=500）
第二行及以下是一个由*和0组成的x*y的图。

Output
输出没被水淹没的OIBH总部的“0”的数量。

Sample Input
样例输入1
4 5
00000
00*00
0*0*0
00*00

样例输入2
5 5

---

0*0
0
0*0

---

Sample Output
样例输出1
1

样例输出2
5

---

var
  tx:array [1..4] of shortint;
  ty:array [1..4] of shortint;
  f:array [1..500,1..500]