while read a;do cal $a;done