euler/e89.c