OFFSET
1,1
LINKS
Andrey Zabolotskiy, Table of n, a(n) for n = 1..10000
Efstratios Gallopoulos, Scientific Computation I, five terms provided (in Greek) [broken link]
Mark, comment on blog post "Rundungsfehler im Flash Player?", eight terms (in German)
koDoz, comment in thread "Welche Grenzwerte gelten für Zahlen, Strings usw?", nine terms (in German)
PROG
(Python 2 or Python 3)
for i in range(1, 1000):
if i*(1./i) != 1: print(i)
(Fortran)
doubleprecision one, r
integer i
parameter (one=1.0D0)
do 10 i = 1, 500
R = one / dble(i)
if ( R * dble(i) .ne. one) write (*, 1000) i
1000 format (i0)
10 continue
end
C Hugo Pfoertner, Jan 18 2024
CROSSREFS
KEYWORD
nonn,fini
AUTHOR
Adam M. Scherlis, Aug 06 2019
STATUS
approved