• Lenguaje

    Pascal

  • Descripción

    El dueño de una casa quiere alquilarla queriendo obtener una cantidad X de pesos, pero tiene que pagar un impuesto de Y, que es un porcentaje sobre el monto del alquiler. Determinar ¿Cuánto debe ser el alquiler para obtener la cantidad X?

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

var alquiler, cantidad_X, impuesto_Y, porcentaje_de_impuesto : real;
begin
    write ('Ingresa el valor de cantidad X: ');
    readln (cantidad_X);
    write ('Ingresa el valor de porcentaje de impuesto: ');
    readln (porcentaje_de_impuesto);
    impuesto_Y := porcentaje_de_impuesto*cantidad_X/100;
    alquiler := cantidad_X+impuesto_Y;
    writeln ('Valor de alquiler: ', alquiler:0:6);
    writeln ('Valor de impuesto Y: ', impuesto_Y:0:6);
    writeln;
    write ('Presiona una tecla para terminar . . . ');
    readkey;
end.