lunes, 4 de abril de 2011

la suma resta y mul de 5 numeros

Suma, resta y multiplicación de 5 números





var num1,num2,num3,num4,num5,suma,resta,mul: numerico
inicio
    cls()
    imprimir("\n calcula la suma, resta y multiplicacion de 5 numeros")
    imprimir("\ndigite el valor del primer numero")
    leer(num1)
    imprimir("\n digite el valor del segundo numero")
                 leer(num2)
    imprimir("\n digite el vaor del tercer numero")
    leer(num3)
    imprimir("\ndigite el valor del cuarto numero")
    leer(num4)
    imprimir("\n digite el valor del quinto numero")
                 leer(num5)
    suma=num1+num2+num3+num4+num5
    resta=num1-num2-num3-num4-num5
                 mul=num1*num2*num3*num4*num5
    imprimir("\n la suma de los cinco numeros es"  ,suma)
    imprimir("\n la resta de los cinco numeros es" ,resta)
    imprimir("\n la multiplicacion de los cinco numeros es" ,mul)
fin

No hay comentarios:

Publicar un comentario