Data update

2026-04-30 12:34:36 -04:00 · 2026-04-30 12:34:36 -04:00 · cbaf4c4b64
commit cbaf4c4b64
parent 4bb20c9b71
12390 changed files with 318560 additions and 27248 deletions
--- a/Task/Seven-sided-dice-from-five-sided-dice/VBScript/seven-sided-dice-from-five-sided-dice.vbs
+++ b/Task/Seven-sided-dice-from-five-sided-dice/VBScript/seven-sided-dice-from-five-sided-dice.vbs
@ -0,0 +1,13 @@
+Option Explicit
+
+function dice5
+	dice5 = int(rnd*5) + 1
+end function
+
+function dice7
+	dim j
+	do
+		j = 5 * dice5 + dice5 - 6
+	loop until j < 21
+	dice7 = j mod 7 + 1
+end function