labunix's blog

labunixのラボUnix

「ゴールデンウイークシェル芸問題」を解いてみた。

■「ゴールデンウイークシェル芸問題」を解いてみた。

 http://blog.ueda.asia/?p=6063

■条件が「forもwhileもなしでパイプで繋げて」とのことですので。

$ seq 1 100 > ans
$ awk '{myprime = "factor | sed s/://";print $0 | myprime}' ans | \
  awk '(NF>2){print $1 > "ans"}'

$ cat ans | column -c 80
4	16	27	38	49	58	69	80	90	99
6	18	28	39	50	60	70	81	91	100
8	20	30	40	51	62	72	82	92
9	21	32	42	52	63	74	84	93
10	22	33	44	54	64	75	85	94
12	24	34	45	55	65	76	86	95
14	25	35	46	56	66	77	87	96
15	26	36	48	57	68	78	88	98