7 lines
166 B
Text
7 lines
166 B
Text
#include <basico.h>
|
|
|
|
algoritmo
|
|
s=675248, i=5
|
|
iterar grupo( --i, i, #( s = int(s ^2 / 1000 % 1000000) ) \
|
|
s, NL, imprimir )
|
|
terminar
|