PROGRAMA PARA CALCULAR EL VOLUMEN
DE UN CILINDRO EN FOX PRO


store 0 to r,h
store 3.1416 to pi
clear
@10,10 say "Introduzca el radio" get r
read
@11,10 say "Introduzca la altura" get h
read
V=pi*r*r*h
@14,10 say"V="
@14,13 say V
@14,30 say"unidades cubicas"
WAIT