OFFSET
0,6
MAPLE
REM := (n, k) -> ifelse(k = 0, n, irem(n, k)):
T := n -> local k; seq(REM(k^2, n), k = 0..n):
seq(T(n)[iquo(n, 2) + 1], n = 0..73);
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Jun 23 2024
STATUS
approved