CHÚC BẠN HỌC TỐT!!!
Trả lời:
program kaito;
uses crt;
var dongia, soluong, thanhtien: real;
const ship=10000;
begin
clrscr;
write('Don gia: '); readln(dongia);
write('So luong: '); readln(soluong);
thanhtien:=dongia*soluong+ship;
writeln('So tien can tra la: ',thanhtien);
readln
end.