Program opdracht9 ;
 
var
	Getal1 ,Getal2  ,Getal3 ,kleinste , middel ,grootste: Integer;
 
begin
	Write (‘ Geef een heel getal ') ;
	Read (Getal1) ;
	Write (‘ Geef nog een heel getal ‘) ;
	Read (Getal2) ;
        Write (‘ Geef nog een heel getal ‘) ;
	Read (Getal3) ;
	If Getal1<=Getal2 Then kleinste :=Getal1 Else kleinste :=Getal 2 ;
	If Getal3<=kleinste Then kleinste :=Getal3 ; 
        If Getal1>=Getal2 Then grootste :=Getal1 Else grootste := Getal2;
	If Getal3>=grootste Then grootste :=Getal3 ;
	If Getal1<=Getal2<=Getal3 Then Getal2 :=middel ;
	If Getal2<=Getal3<=Getal1 Then Getal3 :=middel ;
	If Getal3<=Getal1<=Getal2 Then Getal1 :=middel ;
	Writeln (‘ Dus de volgorde is ‘ kleinste ‘en’ middel ‘en’ grootste) ;
end. 
 

UHJvZ3JhbSBvcGRyYWNodDkgOwoKdmFyCglHZXRhbDEgLEdldGFsMiAgLEdldGFsMyAsa2xlaW5zdGUgLCBtaWRkZWwgLGdyb290c3RlOiBJbnRlZ2VyOwoKYmVnaW4KCVdyaXRlICjigJggR2VlZiBlZW4gaGVlbCBnZXRhbCAnKSA7CglSZWFkIChHZXRhbDEpIDsKCVdyaXRlICjigJggR2VlZiBub2cgZWVuIGhlZWwgZ2V0YWwg4oCYKSA7CglSZWFkIChHZXRhbDIpIDsKICAgICAgICBXcml0ZSAo4oCYIEdlZWYgbm9nIGVlbiBoZWVsIGdldGFsIOKAmCkgOwoJUmVhZCAoR2V0YWwzKSA7CglJZiBHZXRhbDE8PUdldGFsMiBUaGVuIGtsZWluc3RlIDo9R2V0YWwxIEVsc2Uga2xlaW5zdGUgOj1HZXRhbCAyIDsKCUlmIEdldGFsMzw9a2xlaW5zdGUgVGhlbiBrbGVpbnN0ZSA6PUdldGFsMyA7IAogICAgICAgIElmIEdldGFsMT49R2V0YWwyIFRoZW4gZ3Jvb3RzdGUgOj1HZXRhbDEgRWxzZSBncm9vdHN0ZSA6PSBHZXRhbDI7CglJZiBHZXRhbDM+PWdyb290c3RlIFRoZW4gZ3Jvb3RzdGUgOj1HZXRhbDMgOwoJSWYgR2V0YWwxPD1HZXRhbDI8PUdldGFsMyBUaGVuIEdldGFsMiA6PW1pZGRlbCA7CglJZiBHZXRhbDI8PUdldGFsMzw9R2V0YWwxIFRoZW4gR2V0YWwzIDo9bWlkZGVsIDsKCUlmIEdldGFsMzw9R2V0YWwxPD1HZXRhbDIgVGhlbiBHZXRhbDEgOj1taWRkZWwgOwoJV3JpdGVsbiAo4oCYIER1cyBkZSB2b2xnb3JkZSBpcyDigJgga2xlaW5zdGUg4oCYZW7igJkgbWlkZGVsIOKAmGVu4oCZIGdyb290c3RlKSA7CmVuZC4gCg==