Hãy viết chương trình Pascal để tính tiền điện cho gia đình Gợi ý: công thức cần tính Tiền điện = Đơn giá * Số điện mới - số điện cũ + trong đó đơn giá = 900 đồng/ một số điện Giup mình với ạ ^^

2 câu trả lời

program ct;
uses crt;
var Tong,SoDienCu,SoDienMoi:real;
const DonGia=900;
begin
    clrscr;
    writeln('Nhap so dien cu: ');readln(SoDienCu);
    writeln('Nhap so dien moi: ');readln(SoDienMoi);
    Tong:=DonGia*SoDienMoi-SoDienCu;
    writeln('Tong tien dien la: ',Tong:5:0,'đ');
    readln;
end.

___________________

Học tốt nha. =))

program dien;
uses crt;
var sdc, sdm, tien : real;
const dongia = 900;
begin
clrscr;
write('nhap chi so tieu thu dien cu :');readln(sdc);
write('nhap chi so tieu thu dien moi :');readln(sdm);
tien := dongia*sdm-sdc;
writeln('so tien phai tra la :', tien:8:2,' dong');
readln
end.