In[]:=
34^566
Out[]=
656246569124808440319012771067142620561577955095228475323119632934733629086394739844981411047465365752380861409907362743146144987655036179693681666723481914308312304474282468808828900473754356312853836958524879186429732620284227425383838884808942253222225353782774095290304933535114126805327484912088899949971006363170862027041870987477626789926686396636025996247742068379731248139655338050088317194901681883189067340498588842409147526231246066864027628112343685710525988648151071440411011843045537983537696783487657336001461867688123043931038238883166141887195418267808602539232671033828935304602133052991899851710477074758180776075203824445475722546689837890027013737799539450466430704033890380890128225295593294780072765565041946650813393260660858678570353103022834516114384247281785177369793284975238904263234694252153238384788929784412421389180264064510188322816
In[]:=
Manipulate[Labeled[Graphics[RegularPolygon[n]],Style[Area[RegularPolygon[n]],Large]],{n,3,30,1}]
Out[]=
In[]:=
Manipulate[Graphics3D[AugmentedPolyhedron[Icosahedron[],p]],{p,0,2}]
Out[]=
In[]:=
EntityList["Polyhedron"]
Out[]=
In[]:=
RandomSample[%,10]
Out[]=
,,,,,,,,,
In[]:=
Out[]=
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
In[]:=
#&/@%12
Out[]=
,,,,,,,,,
Korean War
Korean War