FoxPro/Visual FoxPro - ayuda por favooooooooor

   
Vista:

ayuda por favooooooooor

Publicado por Gustavo Delgado (3 intervenciones) el 29/01/2009 02:10:52
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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Mauricio

Ayuda por favooooooooor

Publicado por Mauricio (1368 intervenciones) el 29/01/2009 03:36:26
Gustavo, todo esta bien, solo tienes que cambiar el ultimo SAY, asi:
@12,35 SAY ventat
Suerte !!!!!!!!!!!!!!!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda por favooooooooor

Publicado por Gustavo Delgado (3 intervenciones) el 29/01/2009 03:56:10
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Mauricio

Ayuda por favooooooooor

Publicado por Mauricio (1368 intervenciones) el 29/01/2009 21:13:55
Te falta cerrar el FOR con ENDFOR
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar