{"id":426,"date":"2014-11-19T15:21:19","date_gmt":"2014-11-19T13:21:19","guid":{"rendered":"http:\/\/markusheinemann.com\/wordpress\/?page_id=426"},"modified":"2014-11-19T15:24:36","modified_gmt":"2014-11-19T13:24:36","slug":"mathematische-kniffe","status":"publish","type":"page","link":"https:\/\/markusheinemann.com\/wordpress\/?page_id=426","title":{"rendered":"mathematische Kniffe"},"content":{"rendered":"

Mit der Cantorschen Paarungsfunktion lassen sich zwei Zahlen zu einer zusammenf\u00fchren und sp\u00e4ter wieder trennen:<\/p>\n

http:\/\/de.wikipedia.org\/wiki\/Cantorsche_Paarungsfunktion<\/a><\/p>\n

 <\/p>\n

\n

vb.net Code:<\/p>\n

Public Class CantorBerechnung<\/span><\/em><\/p>\n

‚diese Berechnung erstellt aus zwei Zahlen eine (contorberechnen(Zahl1,Zahl2) und zerlegt diese wieder ComputeX(Cantorzahl); ComputeY(Cantorzahl)<\/em>
\n Public Function cantorberechnen(x As Long, y As Long)<\/em>
\n cantorberechnen = (x + y) * (x + y + 1) \/ 2 + y<\/em>
\n End Function<\/em><\/p>\n

Public Function computeX(kantorzahlZ As Long)<\/em>
\n Dim j As Long<\/em>
\n j = CLng(Math.Floor(Math.Sqrt(0.25 + 2 * kantorzahlZ) – 0.5))<\/em>
\n computeX = j – (kantorzahlZ – j * (j + 1) \/ 2)<\/em>
\n End Function<\/em><\/p>\n

Public Function computeY(z As Long) As Long<\/em>
\n Dim j As Long<\/em>
\n j = CLng(Math.Floor(Math.Sqrt(0.25 + 2 * z) – 0.5))<\/em>
\n computeY = CLng(z – j * (j + 1) \/ 2) ‚ist stets ganzzahlig<\/em>
\n End Function<\/em>
\nEnd Class<\/em><\/p>\n

\n","protected":false},"excerpt":{"rendered":"

Mit der Cantorschen Paarungsfunktion lassen sich zwei Zahlen zu einer zusammenf\u00fchren und sp\u00e4ter wieder trennen: http:\/\/de.wikipedia.org\/wiki\/Cantorsche_Paarungsfunktion   vb.net Code: Public Class CantorBerechnung ‚diese Berechnung erstellt aus zwei Zahlen eine (contorberechnen(Zahl1,Zahl2) und zerlegt diese wieder ComputeX(Cantorzahl); ComputeY(Cantorzahl) Public Function cantorberechnen(x As Long, y As Long) cantorberechnen = (x + y) * (x + y + 1) […]<\/p>\n","protected":false},"author":2,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"open","ping_status":"open","template":"","meta":{"footnotes":""},"class_list":["post-426","page","type-page","status-publish","hentry"],"_links":{"self":[{"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/pages\/426","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=426"}],"version-history":[{"count":6,"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/pages\/426\/revisions"}],"predecessor-version":[{"id":433,"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=\/wp\/v2\/pages\/426\/revisions\/433"}],"wp:attachment":[{"href":"https:\/\/markusheinemann.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=426"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}