Taller de el codigo del programa para hallar el area del triangulo, cuadrado y el mayor de tres numeros. tambien etsna las imagnes corriendo el programa.
Proceso Calcular_Area_triangulo
//digite base, altura
Escribir "base altura"
Leer base, altura;
area<-0; area<- (base*altura)/2; Escribir "area del triangulo es",area; FinProceso Proceso Nota_Final Escribir "Digite la nota uno"; Leer n1; Escribir "Digite la nota dos"; Leer n2; Escribir "Digite la nota tres"; Leer n3; Escribir "Digite la nota cuatro"; Leer n4; Escribir "Digite la nota cinco"; Leer n5; suma<-(n1+n2+n3+n4+n5); promedio<-(suma/5) Si promedio>=3 Entonces
Escribir "Su Promedio es: ",promedio, " Aprobo el semestre";
Sino
Escribir "Su Promedio es: ",promedio, " Reprobo el semestre";
FinSi
FinProceso
Proceso Area_Del_Cuadrado
//digite lado
Escribir " Ingrese el lado1";
Leer lado1;
Escribir " Ingrese el lado2";
Leer lado2;
area<-(lado1*lado2);
Si lado1=lado2 Entonces
Escribir "El area del cuadrado es:", area;
Sino Escribir "No es un cuadrado";
FinSi
FinProceso
Proceso Calcular_Area_triangulo
//digite base, altura
Escribir "base altura"
Leer base, altura;
area<-0; area<- (base*altura)/2; Escribir "area del triangulo es",area; FinProceso Proceso Nota_Final Escribir "Digite la nota uno"; Leer n1; Escribir "Digite la nota dos"; Leer n2; Escribir "Digite la nota tres"; Leer n3; Escribir "Digite la nota cuatro"; Leer n4; Escribir "Digite la nota cinco"; Leer n5; suma<-(n1+n2+n3+n4+n5); promedio<-(suma/5) Si promedio>=3 Entonces
Escribir "Su Promedio es: ",promedio, " Aprobo el semestre";
Sino
Escribir "Su Promedio es: ",promedio, " Reprobo el semestre";
FinSi
FinProceso
Proceso Area_Del_Cuadrado
//digite lado
Escribir " Ingrese el lado1";
Leer lado1;
Escribir " Ingrese el lado2";
Leer lado2;
area<-(lado1*lado2);
Si lado1=lado2 Entonces
Escribir "El area del cuadrado es:", area;
Sino Escribir "No es un cuadrado";
FinSi
FinProceso
No hay comentarios:
Publicar un comentario