Revision as of 04:16, 27 December 2022 (view source) Jazzedpineda (talk \| contribs) (→‎DWScript: Add EasyLang) ← Older edit		Revision as of 17:51, 25 April 2023 (view source) Menjaraz (talk \| contribs) (→‎{{header\|PARI/GP}}: Refactor) Newer edit →
Line 3,317: =={{header\|PARI/GP}}== <syntaxhighlight lang="parigp">~~fnice(n)={~~ fnice(n)={ my(f,s="",s1); if (n < 2, return(n)); Line 3,323 ⟶ 3,324: s = Str(s, f[1,1]); if (f[1, 2] != 1, s=Str(s, "^", f[1,2])); for(i=2,#f[,1], s1 = Str(" * ", f[i, 1]); if (f[i, 2] != 1, s1 = Str(s1, "^", f[i, 2])); s = Str(s, s1)); s▼ ~~for(i=2,#f[,1],~~ ~~s1 = Str(" * ", f[i, 1]);~~ ▲ if (f[i, 2] != 1, s1 = Str(s1, "^", f[i, 2])); ~~s = Str(s, s1)~~ ); s }; ~~n=0;while(n++, print(fnice(n)))</syntaxhighlight>~~ n=0;while(n++<21, printf("%2s: %s\n",n,fnice(n))) </syntaxhighlight> =={{header\|Pascal}}==

Count in factors: Difference between revisions

Count in factors (view source)