Định mức tiền điện hàng tháng của một hộ gia đình như sau: + 50 kWh đầu tiên có giá là 600vnđ/1kWh. + 50 kWh tiếp theo có giá là 1004vnđ/1kWh. + 50 kWh tiếp theo nữa trở đi có giá là 1214vnđ/1kWh.
Mức giá này chưa bao gồm thuế giá trị gia tăng (VAT). + Ví dụ: Hộ gia đình A sử dụng 145kWh trong 1 tháng thì phải trả 148.313 nghìn đồng (trong đó, thuế 10% là 13.483 nghìn đồng, tiền chưa thuế là 134.830 nghìn đồng).
program tinh_tien_dien;
var
kwh, tien_chua_thue, tien_thue, tien: real;
begin
writeln('Nhap so kWh dien tieu thu trong thang:');
readln(kwh);
if kwh <= 50 then
tien_chua_thue := kwh * 600
else if kwh <= 100 then
tien_chua_thue := 50 * 600 + (kwh-50) * 1004
else
tien_chua_thue := 50 * 600 + 50 * 1004 + (kwh-100) * 1214;
tien_thue := tien_chua_thue * 0.1;
tien := tien_chua_thue + tien_thue;
writeln('So tien dien phai tra trong thang la: ', tien:0:0, ' VND (trong do, thue 10% la ', tien_thue:0:0, ' VND, tien chua thue la ', tien_chua_thue:0:0, ' VND).');
end.