Odpověď na příspěvek

Re: Diskuze k úloze číslo 4 milan.bohacek (25. 1. 2012 - 15:35)
obr = Characters[{"aaikaaaljdlokjjblkiaacaiiaakkiaaaa",
"aiaciaicicabnaaciaciacibbjdiaciaaa",
"aiaciajdbdbbnbbdjbaiacibemcjfdneaa",
"aiackcdkacccieaaolmeagmbaiciioebbb",
"aiaciabcjdaemebbmfoaacifaicifhaeaa",
"aiaciabcjdebjebdmbciegmfaidnedaaaa",
"aaikaajkacgcoeeaodameccpkaeodbaaea",
"aaeeeabaaaaffaaaabaaeeefaeebaabaee",
"aeeaaebdfbbbbbbbbbaaaaafaeabaefeaa",
"eebaaecebeaaaaabaeeeaaabaeebeebaea",
"ammjmeamjdnjjjjdoiicfbjljlaanlebea",
"aieehbjhjceaiacbndblaaicacbjfdjeea",
"aiaecaicfhbbjbdfigeoaajdbcaiagabbb",
"aiiigaakbcaaiacfikicgclkibdjdbbaaa",
"aiaageacjdbbjbdficicebidaaakaaabbb",
"aiaaceacidaaiadamcakebicabalaaiaaa",
"aiiiicljbdcckabdlfeobailiiacijabaa"}];
obr2 = Partition[Flatten[ToCharacterCode /@ obr], 34];
ArrayPlot[obr2]

A bylo hotovo.
Odpovědět
Předmět:
Jméno:
E-mail:
Pět koček chytí pět myší za pět minut. Za kolik minut chytí sto koček sto myší

Text příspěvku: