turbo assembleur 5.0

include \masm32\include\masm32rt.inc
.const
.data
serie dd 45h,0f12h,10h,7f23h,732h,0
minimum dd 0
maximum dd 0
moyenne dd 0
CPT dd 0
SommeReste dd 0
.code
start:
;------- minimum ------------
mov CPT,LENGTHOF serie
;chercher le plus petit
lea edx,serie
;prendre le premier comme référence
mov eax,[edx]
mov minimum,eax
.while(CPT)
mov eax,[edx]
.if eax < minimum
mov minimum,eax
.endif
add edx,4
dec CPT
.endw
;------- maximum -----------
mov CPT,LENGTHOF serie
;chercher le plus grand
lea edx,serie
;prendre le premier comme référence
mov eax,[edx]
mov maximum,eax
.while(CPT)
mov eax,[edx]
.if eax > maximum
mov maximum,eax
.endif
add edx,4
dec CPT
.endw
;--------- moyenne -----------
;appliquer moyenne = minimum + SommeEcart /20 + SommeRestes/20
mov eax,minimum
mov moyenne,eax
mov CPT,LENGTHOF serie
;chercher le plus grand
push edi
lea edi,serie
.while(CPT)
mov eax,[edi]
mov ecx,minimum
sub eax,ecx
mov ecx,LENGTHOF serie
mov edx,0
div ecx
add moyenne,eax
add SommeReste,edx
;-----------------
add edi,4
dec CPT
.endw
pop edi
;----- ajouter les restes -------
mov eax,SommeReste
mov ecx,LENGTHOF serie
mov edx,0
div ecx
add moyenne,eax
invoke ExitProcess,0
;------- proc içi ------------
end start