Ejemplos De Algoritmos
1. Hacer un algoritmo que sume tres valores y reste un cuarto valor
Var Num1, Num2, Num3, Num4, Res : float
Inicio
Escriba “Digite primer valor” ;Lea Num1 ;
Escriba “Digite segundo valor” ;
Lea Num2 ;
Escriba “Digite tercer valor” ;
Lea Num3 ;
Escriba “Digite cuarto valor” ;Lea Num4 ;
Haga Res = (Num1 + Num2 + Num3 - Num4) ;
Escriba “El resultado es”; Res ;
Fin
2. Hacer un algoritmo para calcular el área de un cuadrado
Var Lado, Area :float
Inicio
Escriba “Digite lado del cuadrado” ;
Lea Lado ;
Haga Area = Lado^2 ;
Escriba “El area del cuadrado es”; Area ;
Fin
3. Hacer unalgoritmo para calcular el área de un triángulo
Var Base, Altu, Area : float
Inicio
Escriba “Digite Base del triangulo” ;
Lea Base ;
Escriba “Digite Altura deltriangulo” ;
Lea Altu ;
Haga Area = (Base * Altura)/2 ;
Escriba “El area del triangulo es”; Area ;
Fin
4. Hacer un algoritmo para calcular el área de unrectángulo
Var Lado1, Lado2, Area : float
Inicio
Escriba “Digite primer lado del rectangulo” ;
Lea Lado1 ;
Escriba “Digite segundo lado del rectangulo” ;
LeaLado2 ;
Haga Area = (Base*Altura) ;
Escriba “El area del rectangulo es”; Area ;
Fin
5. Hacer un algoritmo que lea dos valores, calcule su producto e imprima ésteelevado al cuadrado
Var Num1, Num2, Prod, Res : float
Inicio
Escriba “Digite Primer valor” ;
Lea Num1 ;
Escriba “Digite Segundo valor” ;
Lea Num2 ;Haga Prod = (Num1 * Num2) ;
Haga Res = Prod^2 ;
Escriba “El producto es”; Prod ;
Escriba “El resultado es”; Res ;
Fin
6. Hacer un algoritmo para...
Regístrate para leer el documento completo.