Question

[Phương Quỳnh]

viết chương trình nhập vào đơn giá, số lượng của một mặt hàng. Tính số tiền phải trả biết rằng phải chịu thuế 10%

Answer 1

[Phùng Anh Tuấn]

uses crt;

var d,m,s,t:integer;

begin

clrscr;

write('Nhap don gia:');

readln(d);

write('Nhap so luong:');

readln(m);

s:=d*m;

t:=s*10%;

s:=s+t;

writeln('So tien phai tra:',s);

readln

end.