Page 34 - Introduccion a la Programacion

34 Introducción a la Programación

PRUEBA DE ESCRITORIO

radio generatriz altura aBase aLado aTotal volumen

0 0 0 0 0 0 0

10 5 6 314.15 157.07 471.23 628.31

ALGORITMO EN PseInt
PRUEBA DE ESCRITORIO EN PseInt

1. </ Construya el algoritmo tal que, dado el radio, la generatriz
y la
2. </ altura de un cono, calcule e imprima el área de la base, el
área
3. </ lateral, el área total y su volumen.
4. Algoritmo AREA_CONO
5. DEFINIR radio, generatriz, altura, aBase, aLado, aTotal,
volumen,
6. Como REAL;
7. radio <- 0;
8. generatriz <- 0;

9. altura <- 0;
10. aBase <- 0;
11. aLado <- 0;
12. volumen <- 0;
13. ESCRIBIR “Ingrese el radio del cono: “;
14. LEER radio;
15. ESCRIBIR “Ingrese la generatriz del cono: “;
LEER generatriz;
16. ESCRIBIR “Ingrese la altura del cono: “;
17. LEER altura;
18. aBase <- PI * (radio * radio);
19. aLado <- PI * radio * generatriz;
20. aTotal <- ab * al; </AT= PI * r * (gen + r)
21. volumen <- (1 / 3) * aBase * altura;
22. ESCRIBIR “El área de la base es: “;
23. ESCRIBIR aBase;
24. ESCRIBIR “El área lateral es: “;