Памагите,очень срочно нада!!!!
смысл задачи   "  По данным сведениям об студентах группы определить среднюю массу парней и средний рост девушек. Кто их студентов группы самый высокий"Не работает вычисление среднего роста и массы!вот код под tasm:

data segment
stud struc
  fio  db 15 dup ("?")
  pol db ?
  rost db ?
  ves   db ?
stud ends
mas stud  <"Karpova$",1,168,58>,<"Ivanova$",1,170,62>,<"Sidorov$",0,180,70>,<"Petrov$",0,175,68>,<"Kozlov$",0,182,75>
srr db 0
srv db 0
maxr dw 0
;p db 1
;p1 db 0
mes1 db 0ah,0dh,"Familia Pol  Rost  Ves$"
mes2 db 0ah,0dh,"$"
mes3 db 0ah,0dh,"Srednii rost devushek $"
mes4 db 0ah,0dh,"Srednii ves parney $"
mes5 db 0ah,0dh,"Samyi vysokiy student $"
mes6 db "  $"
data ends
stk segment stack
dw 100 dup ("?")
stk ends
code segment
  assume ds:data,ss:stk,cs:code
vozr proc
   push ax
   push bx
   push cx
   push dx
   mov ax,dx
   mov bx,10
   xor cx,cx
met1:
   xor dx,dx
   div bx
   push dx
   inc cx
   cmp ax,0
   jne met1
   mov ah,6h
met2:
   pop dx
   add dx,30h
   int 21h
   dec cx
   cmp cx,0
   jne met2
   pop dx
   pop cx
   pop bx
   pop ax
   ret
vozr endp
  structur proc
    push ax
    push bx
    push cx
    push dx
    xor dx,dx
   lea dx,mes2
   int 21h
    mov ah,09h
    xor dx,dx
    lea dx,mas[si].fio
    int 21h
    lea dx,mes6
    int 21h
    xor dx,dx
    mov dl,mas[si].pol
    call vozr
    ;int 21h
    lea dx,mes6
    int 21h
    xor dx,dx
    mov dl,mas[si].rost
    call vozr
    lea dx,mes6
    int 21h
    xor dx,dx
    mov dl,mas[si].ves
    call vozr
    lea dx,mes6
    int 21h

  pop dx
  pop cx
  pop bx
  pop ax
ret
structur endp
 start:
   mov ax,data
   mov ds,ax
   lea dx,mes1
    mov ah,09h
    int 21h
    mov cx,90
    xor si,si
    mov si,0

  cikl_viv:
   call structur
   add si,18
   cmp si,cx
   jl cikl_viv
    mov cx,90
    xor si,si
    xor ax,ax
    xor bx,bx
    ;mov bx,2
cikl_form: ;Гдето здесь ошибка!!!
    cmp mas[si].pol,1
    jne M1
    mov dl,mas[si].rost
    ;call vozr
    add al,dl
    add bx,01h
    xor dx,dx
    ;div bx

    mov dl,srr
    add dl,al
    ;mov srr,0      
    mov srr,dl
M1:    
    ;mov dl,srr
    ;mov ah,06h
    ;int 21h
    add si,18
    cmp si,cx
    jl cikl_form
    xor dx,dx
    xor ax,ax
    mov al,srr 
    div bx
    ;mov srr,0
    mov srr,dl
    ;mov bl,srr
    xor si,si
    mov cx,90
    mov ah,09h
    lea dx,mes3
    int 21h
    ;lea dx,mes1
    xor dx,dx
    mov ah,06h
    mov dl,srr
    call vozr
    int 21h
    mov cx,90
    xor si,si
    xor ax,ax
    ;mov bx,5
     mov bx,0
cikl_form1:;Здесь таже ошибка!!!!!!!!!!
    cmp mas[si].pol,0
    jne M2
    add al,mas[si].ves
    xor dx,dx
    ;div bx
    add bx,01h
    mov dl,srv
    add dx,ax
    mov srv,dl
M2:    
    add si,18
    cmp si,cx
    jl cikl_form1
    mov bl,srv
    xor si,si
    mov cx,90
    mov ah,09h
    lea dx,mes4
    int 21h
    ;lea dx,mes1
    mov ah,09h
    mov dl,srv
    int 21h
    mov cx,90
    xor si,si
    xor ax,ax
    mov bx,5
    xor di,di
search:
    mov al,mas[si].rost
    cmp ax,maxr
    jl M3
    mov maxr,ax
    mov di,si
   M3:
    add si,18
    xor ax,ax
    cmp si,cx
    jl search
    xor si,si
    mov cx,90
    mov ah,09h
    lea dx,mes5
    int 21h
    lea dx,mes2
    mov ah,09h
    ;mov dx,maxr
    mov si,di
    call structur
    int 21h
    xor dx,dx
    xor ax,ax
    mov ah,01h
    int 21h
    mov ax,4c00h
    int 21h
 code ends
 end start

да-ааа... и кто возьмется разбираться в твоем коде?!  

Спасибо,сама разобралась!