READ・DATAとセットで使うことを前提しますが、DATAの終わりに印になる要素（数字なら-1、文字なら**等）を足しておいて、ループで読み込みし、それをREADしたら読み込みをやめる、という仕組みにすれば、数える手間は省けます♪