Viết chương trình nhập vào số điện tiêu thụ của 1hộ gia đình .in ra màn hình số tiền cần thanh toán. Biết 50 số đầu tiên tính của mỗi số là 1000đ ,50 số tiếp theo tính có số là 200đ .từ số 101 đến 200 tính là 300đ số từ 201 trở lên là 5000đ.mn giúp e vs
1 câu trả lời
Program Tien_Dien;
uses crt;
var kw,t:longint;
begin;
clrscr;
writeln('nhap so kw dien');readln(kw);
if (kw>0) and (kw<50) then t:=kw*1000;
if (kw>=51) and (kw<=100) then t:=100*1000+(kw-50)*200;
if (kw>=101) and (kw<=200) then t:=50*1000+50*200+(kw-100)*300;
if (kw>=251) then t:=50*1000+50*200+100*300+(kw-200)*5000;
writeln('so tien phai tra la ',t,' dong');
readln
end.
Câu hỏi trong lớp
Xem thêm