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.