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 A100435 #9 Oct 16 2023 23:30:12 %S A100435 0,1,4,9,18,26,44,57,76,93,135,153,212,245,282,317,414,452,575,624, %T A100435 690,759,935,986,1103,1196,1297,1378,1645,1716,2024,2136,2279,2427, %U A100435 2597,2687,3110,3292,3483,3606,4123,4262,4837,5026,5227,5485,6168,6318,6725 %N A100435 Number of distinct products i*j*k for 1 <= i <= j < k <= n. %p A100435 f:=proc(n) local i,j,k,t1; t1:={}; for i from 1 to n-1 do for j from i to n-1 do for k from j+1 to n do t1:={op(t1),i*j*k}; od: od: od: t1:=convert(t1,list); nops(t1); end; %t A100435 f[n_] := Length[ Union[ Flatten[ Table[ i*j*k, {i, n}, {j, i, n}, {k, j + 1, n}] ]]]; Table[ f[n], {n, 49}] (* _Robert G. Wilson v_, Dec 14 2004 *) %o A100435 (Python) %o A100435 def A100435(n): return len({i*j*k for i in range(1,n+1) for j in range(1,i) for k in range(1,j+1)}) # _Chai Wah Wu_, Oct 16 2023 %Y A100435 Cf. A027428, A027425, A027430, A100436. %K A100435 nonn %O A100435 1,3 %A A100435 _N. J. A. Sloane_, Nov 21 2004 %E A100435 More terms from _Robert G. Wilson v_, Dec 14 2004