FoxPro/Visual FoxPro - ayuda por favooooooooor

este es un ejercicio que hice pero al final no me hace la suma de todo osea el total si alguien me puede ayudar se lo agradesco...

set bell off
set talk off
clea
define windows ventana1 double from 1,1 to 33,80 title 'ejercicio4' color r/w
move window ventana1 center
activate windows ventana1

n=0
venta=0
ventat=0
st=0
nombre= space(20)
@5,10 say 'Nombre'
@5,35 get nombre

for I=1 to 7

@6,10 say 'Dia'
@6,35 get I

@7,10 say 'Venta del Dia'
@7,35 get venta

read
ventat=ventat+venta
venta=0
endfor

@10,10 say 'Tienda'
@10,35 say nombre
@12,10 say 'Total de Semana'
@12,35 say venta

wait windows 'Presione Tecla para Continuar'
deactivate windows ventana1
return

Gustavo, todo esta bien, solo tienes que cambiar el ultimo SAY, asi:
@12,35 SAY ventat
Suerte !!!!!!!!!!!!!!!!!!!

gracias men...

en el otro ejercicio me dice error de anidamiento porque sera eso?
me sale justo aqui

set bell off
set talk off
clea
define windows ventana1 double from 1,1 to 33,80 title 'ejercicio5' color r/w
move windows ventana1 center
activate windows ventana1

n=0
acuV=0
acuH=0
sex= space (5)
edad=0
@6,10 say 'Personas en las Fiesta'
@6,40 get n

read
for I=1 to n <<<<<<<< JUSTAMENTE AQUI ME SALE EL ERROR

@10,10 say 'Niños'
@10,20 get I
@11,10 say 'Sexo M o F'
@11,20 get sex
@12,10 say 'Edad'
@12,20 get edad

read

if sex='M' and edad<=11 then
acuV=acuV+1
endif

if sex='F' and edad<=11 then
acuV=acuV+1
endif

sex= space(5)
edad=0

@15,10 say 'Varones'
@15,30 say acuV

@19,10 say 'Hembras'
@19,30 say acuH

wait windows 'Presione Tecla para continuar'
deactivate windows ventana1
return

Te falta cerrar el FOR con ENDFOR