Bài 1: Viết chương trình tính tiền điện sử dụng hàng tháng nhà em biết rằng đơn giá mỗi kwh là 1200 và số lượng điện tiêu thụ được nhập vào từ bàn phím. Biết rằng số tiền bằng đơn giá nhân với số lượng điện tiêu thụ. Bài 2: Giả sử một người thuê trọ với tổng số ngày là 60 ngày, hãy viết chương trinhf: -Tính số tuần khách ở và số ngày lẻ. -Tính số tiền khách phải trả với giá tiền là 350000 đồng/tuần và 70000 đồng/ngày.

Bài 1

program dien;

uses crt;
var t : real;
const dg = 1200; 
begin
clrscr;
write('nhap so dien luong tieu thu :');readln(t);
writeln('so tien dien phai tra la :', dg*t:8:2);
readln
end.
Bài 2
program dien;
uses crt;
var t, n : integer;
begin
clrscr;
write('nhap so ngay khach thue o tro :');readln(n);
writeln('so tuan khach o la :', n div 7);
writeln('so ngay le khach o la :', (n div 7)*3);
writeln('so tien khach phai tra la  :', 350000*(n div 7),' voi gia 350000/tuan');
writeln('so tien khach phai tra la  :', 70000*n, ' voi gia 70000/ngay');
readln
end.