PROGRAMA QUE PERMITE CALCULARLA VELOCIDAD FINALSTORE 0 T
O VF,VO,A,TRESP="S"
DO WHILE (RESP="S")
CLEAR
@5,5 SAY "INTRODUCE EL VALOR DE LA
VELOCIDAD INICIAL" GET VO
READ
@6,5 SAY "INTRODUCE EL VALOR DE LA A
CELERACION" GET A
READ
@7,5 SAY "INTRODUCE EL VALOR DE TIEMPO"
GET T
READ
VF=VO+A*T
@8,5 SAY "VELOCIDAD FINAL="
@8,12 SAY VF
@8,30 SAY "M/SEG2"
WAIT "DECEA OTROS CALCULOS/N?" TO RESPRESP
=UPPER(RESP)
ENDDOWAIT WINDOW "FIN DEL PROGRAMA
PUBLICADO POR LEYDA SOTELO