1/chương trình cần Khai báo những biến, hằng nào? hãy khai báo các biến, hằng đó 2/viết câu lệnh yêu cầu nhập đơn giá? Viết câu lệnh nhập đơn giá từ bàn phím 3/viết câu lệnh yêu cầu nhập số lượng? Viết câu lệnh nhập số lượng từ bàn phím 4/viết câu lệnh gán giá trị thành tiền theo công thức: Tiền thanh toán=đơn giá×số lượng+phí dịch vụ 5/viết câu lệnh in giá trị thành tiền ra màn hình Mn giúp mình với

1. VAR dongia, soluong, tien: int;

    CONST pdv := <giá trị>          

2. Write('Nhập đơn giá: ');

    readln(dongia);

3. Write('Nhập số lượng: ');

    readln(soluong);

4. tien:= dongia * soluong + pdv;

5. write('Thành tiền: ',tien);

p/s: mình chưa biết phí dịch vụ là bn nên bạn bổ sung sau nha

1. VAR dongia, soluong, tien: int;

    CONST pdv := <giá trị>          

2. Write('Nhập đơn giá: ');

    readln(dongia);

3. Write('Nhập số lượng: ');

    readln(soluong);

4. tien:= dongia * soluong + pdv;

5. write('Thành tiền: ',tien);

p/s: mình chưa biết phí dịch vụ là bn nên bạn bổ sung sau nha