Code: Select all
(dotimes (i 9)
(let ((tt (+ 20 (* i 3))))
(if (> tt 24)
(setq tt (- tt 24)))
(insert (format "%d\n" tt))))
Code: Select all
20
23
2
5
8
11
14
17
20
Code: Select all
(dotimes (i 9)
(let ((tt (+ 20 (* i 3))))
(if (> tt 24)
(setq tt (- tt 24)))
(insert (format "%d\n" tt))))
Code: Select all
20
23
2
5
8
11
14
17
20
Hide ads
Users browsing Forums:
Binklemeyer,
CHARVEL235,
crispytaco,
dionisy_cn,
DotNetDotCom.org [Bot],
Facebook [Bot],
freshluggage,
KiloV,
Knappogue,
Muspilli,
NosferatuZodd,
oOKIWIOo,
PetalBot [Bot],
Proximic [Bot],
SyzygyV2 and 349 guests.
ceving
156