Diagramas de flujo : Click aqui
1. Algoritmo que lea dos números, calculando y escribiendo el valor de su suma, resta, producto y división.
Var numero1, numero2, resultado, resultado
1, resultado2, resultado3
Inicio
Escribir "Introduce el primer numero"
Leer numero1
Escribir "Introduce el segundo numero"
Leer numero2
resultado=numero1+numero2
Mostrar "La suma de los dos números es:",
resultado
resultado1=numero1-numero2
Mostrar "La resta de los dos números es:",
resultado1
resultado2=numero1*numero2
Mostrar "La multiplicación de los dos números es:",
resultado2
resultado3=numero1/numero2
Mostrar "La división de los dos números es:",
resultado3
Fin.
2.Algoritmo que lea dos números y nos diga cual de ellos es mayor o bien
si son iguales
(recuerda usar la estructura condicional SI)
Var numero1, numero2 Inicio Escribir "Introduce el primer número" Leer numero1 Escribir "Introduce el segundo número" Leer numero2 Si (numero1>=numero2) Entonces Si (numero1=numero2) Entonces escribir "los números: " numero1,numero2 " son iguales" Sino Escribir numero1 " es el mayor de los dos" FinSi Sino Escribir numero2 " es el mayor de los dos" FinSi Fin
3. Diseñar un algoritmo que pida por teclado dos números; si el primero es negativo,
debe imprimir el producto de los dos y si no lo es, imprimirá la suma.
Var n1,n2,r1,r2
Inicio
Digite "Inserte el primer numero"
Leer N1
Digite "Inserte el segundo numero"
Leer N2
Si (N1 < 0) Entonces
R1= (N1xN2)
Imprimir "El producto de los dos numeros es, R1"
R2= (N1+N2)
Imprimir "El resultado de la suma de los numeros es R2"
|
Fin si
Fin.
4. Una tienda ofrece un descuento del 15% sobre el total de la compra durante el mes
de octubre. Dado un mes y un importe, calcular cuál es la cantidad que se debe cobrar
al cliente.
Inicio
Var V,P,M,N,X
Imp Mensaje ("Ingrese el total de la compra")
Leer P
Imp Mensaje ("Ingrese el mes de la compra")
Leer M
Si (M ="Octubre") Entonces
X= (P x 15%) / 100%
N = P-X
Imp Mensaje("El valor a pagar con descuento es, N")
Si no
Imp Mensaje("El valor a pagar sin descuento es, P")
Finsi
Fin
No hay comentarios:
Publicar un comentario