Re: [問題] 1-9位數不重複印出來 (Awk)

看板Programming作者 (VElysian)時間2年前 (2022/03/02 01:03), 2年前編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/1
awk 'BEGIN { printf "請輸入數字:"; getline num < "-"; \ for(n=1;n<=10**num-1;n++) { s=""; split(n,a,""); for(i in a) if(match(s,a[i])) break; else s=s a[i]; \ if(s==n) print n } }' -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.162.185.242 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Programming/M.1646154198.A.ABD.html ※ 編輯: VElysian (1.162.185.242 臺灣), 03/02/2022 01:07:08
文章代碼(AID): #1Y7b7Mgz (Programming)
文章代碼(AID): #1Y7b7Mgz (Programming)