Question

Một bưu điện tính tiền sử dụng điện thoại cho khách hàng theo công thức:

Tiền thanh toán=đơn giá * số phút + thuê bao

Hãy viết chương trình theo yêu càu sau:

- Nhập họ tên, địa chỉ khách hàng, đơn giá, số phút sử dụng

- Tính và in ra màn hình số tiền khách hàng phải trả. Biết tiền thuê bao là 30000

Answer 1

uses crt;

const tb=30000;

var tt, dg, sp: real;

ht, dc: string;

begin

clrscr;

write('Nhap ho ten khach hang: ');

readln(ht);

write('Nhap dia chi khach hang: ');

readln(dc);

write('Nhap don gia: ');

readln(dg);

write('Nhap so phut su dung: ');

readln(sp);

tt:=dg*sp+tb;

write('Quy khach phai tra: ',tt,' dong.');

readln

end.

Chúc em học tốt!