Question

Viết chương trình tính tiền điện của một hộ gia đình . Biết rằng : - Nếu số kw sử dụng <50kw thì đơn giá 1500đồng/ 1kw. Nếu số kw sử dụng>50 thì đơn giá 2000đồng/1kw. thuế VAT là 5% của tổng tiền phải thanh toán. Kết quả tiền thanh toán được lấy 2 chữ số thập phân Giúp mình với please

Answer 1

uses crt;
var n,s,i,j:longint;
st:real;
begin
clrscr;
write('nhap so kw su dung=');readln(n);
s:=0;
if n<=50 then
begin
for i:=1 to n do
s:=s+1500;
end
else begin
for i:=1 to 50 do
s:=s+1500;
for j:=51 to n do
s:=s+2000;
end;
st:=s+s*5/100;
writeln('so tien tong cong la: ',st:4:2);
readln;
end.

Answer 2

Hướng dẫn -Nhập số kw điện sử dụng của gia đình. -Xét sốkw vừa nhập trên bao nhiêu. -Nếu số kw<50kw thì tiền điện được tính: Đơn giá * sốlượng+ thuếVAT. -Nếu số kw>50 kw thì tiền điện được tính: Đơn giá* sốlượng+ThuếVAT