STORE 0 TO 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 ACELERACION" 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 RESP
RESP=UPPER(RESP)
ENDDO
WAIT WINDOW "FIN DEL PROGRAMA"
lunes, 30 de marzo de 2009
martes, 24 de marzo de 2009
*PROGRAMA PARA CALCULAR LA FUERZA*
store 0 to m,a,f
resp="s"
do while (resp = "s")
clear
@5,5 say "introducir la masa" get m
read
@6,5 say "introduce la aceleracion" get a
read
f=m*a
@8,5 say "fuerza="
@8,12 say f
@8,30 say "newtons"
wait "desea otro calculo s/n" to resp
resp=upper (resp)
end
dowait window "fin del programa"
resp="s"
do while (resp = "s")
clear
@5,5 say "introducir la masa" get m
read
@6,5 say "introduce la aceleracion" get a
read
f=m*a
@8,5 say "fuerza="
@8,12 say f
@8,30 say "newtons"
wait "desea otro calculo s/n" to resp
resp=upper (resp)
end
dowait window "fin del programa"
miércoles, 11 de marzo de 2009
martes, 10 de marzo de 2009
*Programa para resolver el VOLUMEN de un cilindro*
STORE 0 TO R,H
STORE 3.1416 TO PI
CLEAR
@10,10 SAY"INTRODUCIR EL RADIO" GET r
READ
@11,10 SAY"introducir la altura" get h
read
v=pi*r*r*h
@14,10 say "v="
@14,13 say v
@14,30 say "unidades cubicas"
wait
STORE 3.1416 TO PI
CLEAR
@10,10 SAY"INTRODUCIR EL RADIO" GET r
READ
@11,10 SAY"introducir la altura" get h
read
v=pi*r*r*h
@14,10 say "v="
@14,13 say v
@14,30 say "unidades cubicas"
wait
miércoles, 4 de marzo de 2009
miércoles, 25 de febrero de 2009
CUAL ES LA UTILIDAD QUE PRESENTA EL USO DE LOS BLOG?
*Para publicar ideas
*Para dar a conocer informacion relevante
*Para estar en contacto con otros usuarios
*Para compartir archivos
*Para entertenerte
QUE VENTAJAS TIENE SU UTILIDAD?
*Podemos expresar nuestras ideas
*Es una forma mas facil de entregar informacion a diferentes personas
*Es practico
*Para publicar ideas
*Para dar a conocer informacion relevante
*Para estar en contacto con otros usuarios
*Para compartir archivos
*Para entertenerte
QUE VENTAJAS TIENE SU UTILIDAD?
*Podemos expresar nuestras ideas
*Es una forma mas facil de entregar informacion a diferentes personas
*Es practico
Suscribirse a:
Entradas (Atom)



