Vigesimalsystem

**Alina**

Moin zusammen.

Ich weiß nicht, wer von Euch das Vigesimalsystem kennt, aber in Dänemarkt ist es für uns "älteren" normal das wir nicht 69 sagen/schreiben sondern 9 + 3 x 20. Oder 3 1/2 = 70 ( [3 x 20] + [1/2 x 20]) . Die Schreibweise ist bei uns Regionabhängig, aber es ist das gleiche Zahlensystem, das auf 20 beruht (zehn Finger Vorderseite + zehn Finger Innenseite, mit den wir noch als Kind gedanklich zählen gelernt haben). Es ist jeden Fall mal eine Überlegung wert, wie man dieses Zahlensystem in AutoIt anwenden kann. Habe ja Zeit mir da zu überlegen, wie ich es in ein Algorithmus packen könnte. Zahlensysteme ist doch etas schönes, oder?

**Andy**

Diese Zählerei hat mir schon früher in Französisch den Hals gebrochen.
Wer ließ sich denn so etwas einfallen...

50	cinquante	fünfzig
60	soixante	sechzig
70	soixante-dix	sechzig und zehn
80	quatre-vingts	viermal zwanzig
90	quatre-vingt-dix	viermal zwanzig und zehn

Asterix (der Typ war Franzose!) hat zwar gesagt:"Die spinnen, die Römer!" aber haben selbst so einen Mist verzapft, und bestimmt war das der Grund, gerade NICHT das Römische Zahl/Zählsystem zu übernehmen

//EDIT
Sehr nice, in der Voransicht beim Erstellen meines Posts habe ich eine Tabelle eingefügt und auch angezeigt bekommen, als BBcode ist diese Tabelle auch im Text enthalten.
In der Forenansicht nach dem Abschicken wird diese Tabelle im Post aber nicht angezeigt, wieso das?

Hier nochmal ohne "Tabelle" nur die Zahlwörter:
50 cinquante fünfzig
60 soixante sechzig
70 soixante-dix sechzig und zehn
80 quatre-vingts viermal zwanzig
90 quatre-vingt-dix viermal zwanzig und zehn
...und einer der SO zählt, sagt: "Die spinnen, die Römer!"

**chip**

Kenne das System zwar nicht und finde es auch recht seltsam, aber hab mal was zusammengebastelt:

AutoIt

MsgBox(0,"",Vigesimal(69))




Func Vigesimal($zahl)
	$zwanzig = Int($zahl / 20)
	$rest = Mod($zahl, 20)


	If $rest > 0 Then
		Return $zwanzig & " x 20 + " & $rest
	Else
		Return $zwanzig & " x 20"
	EndIf
EndFunc

Alles anzeigen