Pseudocódigo VI

Ejercicios de acciones condicionales.Si..Entonces

Leer dos números e indicar cual es el mayor.

1 Proceso CompararDosNumeros

2      Definir NumA, NumB Como Entero;

3      Escribir "Pon el NumA";

4      Leer NumA;

5      Escribir "Pon el NumB";

6      Leer NumB;

7      Si ( NumA > NumB ) Entonces

8            Escribir NumA , " > ", NumB;

9      Sino

10           si (NumA = Numb) Entonces

11                  Escribir " A = B ";

12           Sino

13                  Escribir " A < B ";

14           FinSi

15     FinSi

16 FinProceso

Leer tres números e indicar cual es el mayor.

1 Proceso LeerTresNumerosYDecirElMayor

2      //Lee tres numeros desde teclado y dice el mayor

3      Definir NumA, NumB, NumC Como Entero;

4      Escribir "Dame los Numeros";

5      Leer NumA, NumB, NumC;

6      Si ( NumA > NumB) Entonces

7            Si (NumA > NumC) Entonces

8                   Escribir "NumA el Mayor ", NumA;

9            Sino

10                  Escribir "NumC el Mayor ", NumC;

11           FinSi

12     Sino // NumB => NumA

13           Si( NumB > NumC) Entonces

14                  Escribir "NumB el Mayor ", NumB;

15           sino

16                  Escribir "NumC el Mayor ", NumC;

17           FinSi

18     FinSi

19 FinProceso

Leer  tres números e indicar cual es el mayor y cual el menor.

1 Proceso LeerTresNumerosYDecirMayorYMenor

2      //Lee tres numeros desde teclado y dice el mayor y menor

3      Definir NumA, NumB, NumC Como Entero;

4      Escribir "Dame los Numeros";

5      Leer NumA, NumB, NumC;

6      Si ( NumA > NumB) Entonces

7            Si (NumA > NumC) Entonces

8                   Si (NumB > NumC ) Entonces // A>B A>C B>C

9                          Escribir "1El Mayor A ", NumA, " El Menor C", NumC;

10                  sino

11                         Escribir "2El Mayor A ", NumA, " El Menor B", NumB;

12                  FinSi

13           Sino

14                  Escribir "3El Mayor es C ", NumC, "El Menor B" ,NumB;

15           FinSi

16     Sino

17           Si (NumB > NumC) Entonces

18                  Si (NumA > NumC ) Entonces // B>A B>C A>C

19                         Escribir "4El Mayor B ", NumB, " El Menor C", NumC;

20                  sino

21                         Escribir "5El Mayor B ", NumB, " El Menor A", NumA;

22                  FinSi

23           Sino

24                  Escribir "6El Mayor es C ", NumC, "El Menor A" ,NumA;

25           FinSi

26     FinSi

27 FinProceso

Lee los tres lados de un triangulo rectángulo, determina si es rectángulo (Pitágoras) y en caso afirmativo  calcula el área.

1 Proceso AreaTrianguloRectangulo

2      //Leer Los lados y calcular area con Pitagoras

3      //Pitagoras H^2 = A^2 + B^2 33 21 39.12

4      // Area = ( A * B ) / 2

5      Definir L1, L2, L3 como Real;

6      Definir H, A, B, Area como Real;

7      Escribir "Dame tres Lados";

8      Leer L1, L2, L3;

9      Si (L1 > L2) Entonces

10           Si ( L1 > L3) Entonces //H = L1

11                  H<-L1;

12                  A<-L2;

13                  B<-L3;

14           Sino // H=L3

15                  H<-L3;

16                  A<-L1;

17                  B<-L2;

18           finsi

19     Sino

20           Si (L2 > L3) Entonces //H=L2

21                  H<-L2;

22                  A<-L1;

23                  B<-L3;

24           Sino //H = L3

25                  H<-L3;

26                  A<-L1;

27                  B<-L2;

28           FinSi

29     FinSi

30     Si (H^2 = A^2 + B^2) Entonces// Area = ( A * B ) / 2

31           Area<- (A * B) /2;

32           Escribir "El area es ", Area;

33     Sino

34           Escribir "No Cumple A Pitagoras";

35     FinSi

36 FinProceso

Siguiente>