→ Cypresslin:read(*,"(a)") 變數 或是用自由格式讀入後ichar(變數) 11/07 10:03
→ Cypresslin:檢查它被認為是多少 以後再判斷ichar(變數)相等就印出/ 11/07 10:07
→ ctboy:我是寫成 read(*,*) operator 11/07 10:37
→ ctboy:要像你那樣就是指定格式的意思嗎? 11/07 10:44
→ Cypresslin:yes 11/07 13:53
→ jubilee2:另解用 代號 +>1 ->2 *>3 4>/ 配合CASE SELECT 11/07 17:30