プログラマ専用SNS ミクプラ

入力
０１０
１０１
０１０

上のように１で囲まれている０がある時
０の上に１、左に１、右に１、下に１があるのを見つけるにはどうすればいいですか？

コンパイル環境など記載お願いします。
また丸投げはご遠慮ください。
フォーラムルールをお読みください。