Importe de venta de un producto en lenguaje Pascal

Lenguaje

Pascal
Descripción

Solicitar el nombre, precio y la cantidad vendida de un producto; luego, calcular el importe de venta. Finalmente, mostrar como resultado el importe de la venta.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

program ImporteDeVentaDeUnProducto;

uses crt;

var cantidad_vendida, importe_de_venta, precio : real;

var nombre : string;

begin

    write ('Ingresa el nombre: ');

    readln (nombre);

    write ('Ingresa el valor de cantidad vendida: ');

    readln (cantidad_vendida);

    write ('Ingresa el valor de precio: ');

    readln (precio);

    importe_de_venta := precio*cantidad_vendida;

    writeln ('Nombre: ', nombre);

    writeln ('Valor de importe de venta: ', importe_de_venta:0:6);

    writeln;

    write ('Presiona una tecla para terminar . . . ');

    readkey;

end.