-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
A partir de 3 cantidades que te dan debes calcular el área de un círculo tomando como radio la cantidad mayor si la intermedia es mayor o igual a 5 de lo contrario se toma la menor. No hay iguales.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Proceso AreaDeUnCirculoAPartirDe3Cantidades
Escribir Sin Saltar "Ingresa el valor de cantidad 1:";
Leer cantidad_1;
Escribir Sin Saltar "Ingresa el valor de cantidad 2:";
Leer cantidad_2;
Escribir Sin Saltar "Ingresa el valor de cantidad 3:";
Leer cantidad_3;
Si cantidad_1>cantidad_2 Entonces
mayor <- cantidad_1;
menor <- cantidad_2;
SiNo
mayor <- cantidad_2;
menor <- cantidad_1;
FinSi
Si mayor<cantidad_3 Entonces
mayor <- cantidad_3;
FinSi
Si menor>cantidad_3 Entonces
menor <- cantidad_3;
FinSi
intermedia <- (cantidad_1+cantidad_2+cantidad_3)/3;
Si intermedia>=5 Entonces
radio <- mayor;
SiNo
radio <- menor;
FinSi
area <- PI*radio*radio;
Escribir "Valor de area: ", area;
Escribir "Valor de intermedia: ", intermedia;
Escribir "Valor de mayor: ", mayor;
Escribir "Valor de menor: ", menor;
Escribir "Valor de radio: ", radio;
FinProceso
Escribir Sin Saltar "Ingresa el valor de cantidad 1:";
Leer cantidad_1;
Escribir Sin Saltar "Ingresa el valor de cantidad 2:";
Leer cantidad_2;
Escribir Sin Saltar "Ingresa el valor de cantidad 3:";
Leer cantidad_3;
Si cantidad_1>cantidad_2 Entonces
mayor <- cantidad_1;
menor <- cantidad_2;
SiNo
mayor <- cantidad_2;
menor <- cantidad_1;
FinSi
Si mayor<cantidad_3 Entonces
mayor <- cantidad_3;
FinSi
Si menor>cantidad_3 Entonces
menor <- cantidad_3;
FinSi
intermedia <- (cantidad_1+cantidad_2+cantidad_3)/3;
Si intermedia>=5 Entonces
radio <- mayor;
SiNo
radio <- menor;
FinSi
area <- PI*radio*radio;
Escribir "Valor de area: ", area;
Escribir "Valor de intermedia: ", intermedia;
Escribir "Valor de mayor: ", mayor;
Escribir "Valor de menor: ", menor;
Escribir "Valor de radio: ", radio;
FinProceso