Sistemas Computacionales Administrativos.

Sistemas Computacionales Administrativos

Algorítmica

Página 50 y 51  

Hacer un algoritmo que calcule e imprima el de de un artículo. se del costo de producción. El de al el 120% de utilidad y el impuesto.

1 Hacer un algoritmo que calcule e imprima el costo de  producción de un artículo, teniendo como datos la descripción y el número de unidades producidas. El costo se calcula multiplicando el número de unidades producidas por un factor de costo de materiales de 3.5, y sumándole al producto un costo fijo de 10700.

[pic 1]

[pic 2]

2, Hacer un algoritmo que calcule e imprima el costo de un terreno rectangular, teniendo como datos la anchura y la longitud en metros, y el costo del metro cuadrado. [pic 3]

[pic 4]

3. Hacer un algoritmo que convierta un número dado de Segundos en minutos, y que imprima el resultado.

Proceso conversion

        Definir seg, min Como real;

        Escribir "introducir los segundos que desaeas convertir ";

        leer seg;

        min <- seg / 30;

        Escribir " Los minutos que hay en ", seg   ," segundos. ",       "Son:" min;

FinProceso

[pic 5]

4. Una temperatura en grados centígrados (C) se puede convertir a su equivalente Fahrenheit (F) con la fórmula:

Hacer un algoritmo que lea una temperatura en grados centígrados y obtenga e imprima la temperatura Fahrenheit equivalente.

Proceso C_F

        Definir centigrados Como Real;

        Definir mult Como Real;

        Escribir 'ingresa la temperatura en centigrados';

        Leer centigrados;

        mult<-centigrados+32;

        Escribir 'la convercion resultante en grados Fahrenheit es ',mult;

FinProceso

[pic 6]

5. El siguiente Sistema de ecuaciones lineales: se puede resolver con las fórmulas:
Elaborar un algoritmo que lea los coeficientes a, b, c, d, t y f, y que calcule e imprima los valores de X y Y.

Proceso EcuacionesLineales  

        Definir Coeficiente_A,Coeficiente_B, Coeficiente_C, Coeficiente_D, Coeficiente_E, Coeficiente_F, multiplicacion, resta,division, resultado_x1, resultado_y1 como numero;

        Escribir "dame el valor de Coeficiente_A";

        Leer Coeficiente_A;

        Escribir "Dame el valor de Coeficiente_B";

        Leer Coeficiente_B;

        Escribir "Dame el valor de Coeficiente_C";

        Leer Coeficiente_C;

        Escribir "Dame el valor de Coeficiente_D";

        Leer Coeficiente_D;

        Escribir "Dame el valor de Coeficiente_E";

        Leer Coeficiente_E;

        Escribir "Dame el valor de Coeficiente_F";

        Leer Coeficiente_F;

        resultado_x1  <-(Coeficiente_C*Coeficiente_E-Coeficiente_B*Coeficiente_F) / (Coeficiente_A*Coeficiente_E-Coeficiente_B*Coeficiente_D);

        resultado_y1 <- (Coeficiente_A*Coeficiente_F-Coeficiente_C*Coeficiente_D)/(Coeficiente_A*Coeficiente_E-Coeficiente_B*Coeficiente_D);

        Escribir "Resultado de x1 es", resultado_x1;

        Escribir "Resultado de y1 es", resultado_y1;

        FinProceso

[pic 7]

6. Hacer un algoritmo que lea un número de pies y calcule e imprima su equivalente en yardas, pulgadas, centímetros y metros, de acuerdo con las siguientes equivalencias  1 pie 12 pulgadas. I yarda 23 pies, 1 pulgada z 254 cm, 1 metro 100 cm.

Proceso convercion_pies

        Definir pies,melt,malt,molt,mult Como Real;

        Escribir 'ingrese por favor el numero de pies a transformar';

        Leer pies;

        mult<-pies*12/1;

        molt<-pies*1/3;

        malt<-pies*12/1*2.64;

        melt<-pies*0.30480;

        Escribir 'el resultado de su conversion en pulgadas es ',mult;

        Escribir 'el resultado de su conversion  en yardas es ',molt;

        Escribir 'el resultado de su conversion en centimetros es ',malt;

        Escribir 'el resultado de su conversion en metros  es ',melt;

FinProceso

[pic 8]

Página 76

Elabore un algoritmo que lea el número de mes entre I y 12 y, que imprima el nombre del mes correspondiente: si es I 'Enero', si es 2 'Febrero',...etc.

Proceso DICEMES

        Definir NUMES Como Entero;

        Escribir 'Introduce un numero del 1 al 12';

        Leer NUMES;

        Segun NUMES  Hacer

                1:

                        Escribir 'Enero';

                2:

                        Escribir 'Febrero';

                3:

                        Escribir 'Marzo';

                4:

                        Escribir 'Abril';

                5:

                        Escribir 'Mayo';

                6:

                        Escribir 'Junio';

...