This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A100436 #9 Oct 16 2023 23:30:17 %S A100436 0,1,4,10,20,27,46,61,84,101,147,163,226,256,292,331,434,472,601,655, %T A100436 719,785,968,1016,1143,1233,1346,1433,1713,1778,2099,2219,2363,2509, %U A100436 2677,2763,3202,3381,3573,3690,4223,4360,4951,5149,5347,5598,6298,6449 %N A100436 Number of distinct products i*j*k for 1 <= i < j <= k <= n. %p A100436 f:=proc(n) local i,j,k,t1; t1:={}; for i from 1 to n-1 do for j from i+1 to n do for k from j to n do t1:={op(t1),i*j*k}; od: od: od: t1:=convert(t1,list); nops(t1); end; %t A100436 f[n_] := Length[ Union[ Flatten[ Table[ i*j*k, {i, n}, {j, i + 1, n}, {k, j, n}]]]]; Table[ f[n], {n, 48}] (* _Robert G. Wilson v_, Dec 14 2004 *) %o A100436 (Python) %o A100436 def A100436(n): return len({i*j*k for i in range(1,n+1) for j in range(1,i+1) for k in range(1,j)}) # _Chai Wah Wu_, Oct 16 2023 %Y A100436 Cf. A027425, A027430, A100435. %K A100436 nonn %O A100436 1,3 %A A100436 _N. J. A. Sloane_, Nov 21 2004 %E A100436 More terms from _Robert G. Wilson v_, Dec 14 2004