Question

5. Elaborar un programa en el cual se solicite el radio, con este calcular el área de un circulo, posteriormente se convertirá en una esfera con el mismo radio del cual se calculara el área, y el volumen, se utilizara la siguiente fórmula para el área del circulo= pi*r2, a continuación, para el área de la esfera = 4*pi*r2, para el volumen de la esfera = 4/3*pi*r3. se solicitará el radio en la función principal main(), se enviara como parámetro a cada función área_circulo, área_esfera y volumen_esfera, es resultado se mostrara en cada función, para elevar el número a la potencia deseada, no se realizaran multiplicaciones por el mismo número. Funciones sin retorno y con parámetros.

Answer 1

El programa no especifica un lenguaje, asumiremos que está en c:

#include<stdio.h>

#include<math.h>

#define SIN_TIPO float

float volumen_esfera(float rad);

float area_esfera(float rad);

float area_circulo(float rad);

float volumen_esfera(float rad) {

float pi;

float v;

v = (4/3)*M_PI*pow(rad,3);

return v;

}

float area_esfera(float rad) {

float area;

float pi;

area = 4*M_PI*pow(rad,2);

return area;

}

float area_circulo(float rad) {

float area;

float pi;

area = M_PI*pow(rad,2);

return area;

}

int main() {

SIN_TIPO a_circulo;

SIN_TIPO a_esfera;

SIN_TIPO r;

SIN_TIPO vol;

printf("Ingrese Radio: ");

scanf("%s",r);

vol = volumen_esfera(r);

a_esfera = area_esfera(r);

a_circulo = area_circulo(r);

printf("El volumen es: %s\n",vol);

printf("El area de la esfera es: %s\n",a_esfera);

printf("El area del circulo es: %s\n",a_circulo);

return 0;

}

De igual forma te dejo, el pseudocódigo que puedes colocar en PSInt y exportarlo en el lenguaje que quieras.

Verifica que se encuentras desarrolladas las tres funciones solicitadas para hallar el volumen y área de la esfera y también el área del círculo.

Funcion v <- volumen_esfera (rad)

v <- (4/3)*PI*rad^3

FinFuncion

Funcion area <- area_esfera (rad)

area <- 4*PI*rad^2

FinFuncion

Funcion area <- area_circulo (rad)

area <- PI*rad^2

FinFuncion

Algoritmo operaciones_radio

Escribir 'Ingrese Radio: ' Sin Saltar

Leer r

vol <- volumen_esfera(r)

a_esfera <- area_esfera(r)

a_circulo <- area_circulo(r)

Escribir 'El volumen es: ',vol

Escribir 'El area de la esfera es: ',a_esfera

Escribir 'El area del circulo es: ',a_circulo

FinAlgoritmo

Te dejo además el diagrama de flujo de la función que calcula el volumen de la esfera.