• Lenguaje

    Pascal

  • Descripción

    La fábrica "Chiriqui" produce diversos artículos. Se calcular los precios de venta. Para esto hay que considera lo siguiente: costo de producción = materia prima + mano de obra + gastos de fabricación. Lea estas 3 variables, calcule e imprima el precio de venta = costo de producción + 45% de costo de producción.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program FabricaChiriqui;
uses crt;

var costo_de_produccion, gastos_de_fabricacion, mano_de_obra, materia_prima, precio_de_venta : real;
begin
    write ('Ingresa el valor de gastos de fabricacion: ');
    readln (gastos_de_fabricacion);
    write ('Ingresa el valor de mano de obra: ');
    readln (mano_de_obra);
    write ('Ingresa el valor de materia prima: ');
    readln (materia_prima);
    costo_de_produccion := materia_prima+mano_de_obra+gastos_de_fabricacion;
    precio_de_venta := costo_de_produccion*1.45;
    writeln ('Valor de costo de produccion: ', costo_de_produccion:0:6);
    writeln ('Valor de precio de venta: ', precio_de_venta:0:6);
    writeln;
    write ('Presiona una tecla para terminar . . . ');
    readkey;
end.