-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Algoritmo que permite ingresar los dos lados de un cuadrilátero, y muestra el texto "Es un cuadrado" si ambos lados forman un cuadrado o muestra el texto "Es un rectángulo" si la figura que se forma con dichos lados es un rectángulo, además mostrar el área y el perímetro de dicha figura.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Proceso CuadradoORectangulo
Escribir Sin Saltar "Ingresa el valor de lado a:";
Leer lado_a;
Escribir Sin Saltar "Ingresa el valor de lado b:";
Leer lado_b;
area <- lado_a*lado_b;
perimetro <- (lado_a+lado_b)*2;
Si lado_a = lado_b Entonces
Escribir "Es un cuadrado";
SiNo
Escribir "Es un rectángulo";
FinSi
Escribir "Valor de area: ", area;
Escribir "Valor de perimetro: ", perimetro;
FinProceso
Escribir Sin Saltar "Ingresa el valor de lado a:";
Leer lado_a;
Escribir Sin Saltar "Ingresa el valor de lado b:";
Leer lado_b;
area <- lado_a*lado_b;
perimetro <- (lado_a+lado_b)*2;
Si lado_a = lado_b Entonces
Escribir "Es un cuadrado";
SiNo
Escribir "Es un rectángulo";
FinSi
Escribir "Valor de area: ", area;
Escribir "Valor de perimetro: ", perimetro;
FinProceso