読み込みループの中で read 文字列変数 read 各要素 の様に2つread命令を書けば良いと思います