Mình đánh dấu từ số 1 xuống cho dễ thấy

(1) Khai báo các biến ứng với kiểu dữ liệu phù hợp

(2) Khai báo hằng

(3) Gán cho biến thongbao 1 xâu kí tự

(4) Làm rõ cho chương trình rằng bước tiếp theo là nhập đơn giá và số lượng hàng

(5) In ra màn hình xâu 'Don gia' và nhập từ bàn phím giá trị của biến dongia

(6) In ra màn hình xâu 'So luong' và nhập từ bàn phím giá trị của biến soluong

(7) Gán biểu thức tính ra giá tiền vào biến thanhtien

(8) Thông báo ra biến thongbao và thanhtien

var soluong:integer 

dongia,thanhtien:real

thongbao:string;

--> khai báo biến

const phi=10000

--.khai báo hằng

thongbao:='tong so tien phai thanh toan';

-->gán xâu ký tự 

{nhap do gia va so luong}

-->chú thích cho chương trình

write('don gia');readln(dongia);

--> yêu cầu nhập đơn giá và nhập số từ bàn phím

write('so luong');readln(soluong);

--> yêu cầu nhập số lượng và nhập số từ bàn phím

thanhtien:=soluong*dongia+phi;

-->gán giá trị cho đơn giá

{*in ra so tien phai tra*}

-->chú thích cho chương trình

writeln(thongbao,thanhtien:10:2);

--> in ra màn hình câu:'tong so tien phai thanh toan',với giá trị của biến

cảm ơn nhiều ạ

chúc bạn học giỏi tin học lớp 8 nhé!