From a7d7542dc646a5fd124ef71e71ce260889f1701b Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Tue, 2 Feb 2016 19:24:50 +0100 Subject: Moved to 1415 directory --- 1415/files/practicum/Wisselgeld.icl | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 1415/files/practicum/Wisselgeld.icl (limited to '1415/files/practicum/Wisselgeld.icl') diff --git a/1415/files/practicum/Wisselgeld.icl b/1415/files/practicum/Wisselgeld.icl new file mode 100644 index 0000000..493e507 --- /dev/null +++ b/1415/files/practicum/Wisselgeld.icl @@ -0,0 +1,21 @@ +implementation module Wisselgeld + +import StdEnv + +:: Bedrag :== Int // een positief getal +:: Valuta :== Int // een positief getal +:: Valutas :== [Valuta] // een niet-lege lijst +:: Munt :== Int // een positief getal +:: K :== Int // een positief getal +:: WisselGeld :== [Munt] + +// Implementeer en test onderstaande functie: +wissel :: Bedrag Valutas K -> [WisselGeld] +wissel ... + +// Test-cases uit opdrachtenbundel: +Start = ( wissel 50 [100,50,20,10,5,1] 1 + , wissel 50 [100,50,20,10,5,1] 2 + , wissel 50 [100,50,20,10,5,1] 3 + , wissel 50 [100,50,20,10,5,1] 4 + ) -- cgit v1.2.3