Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Tinh tien;
2. Uses crt
3. ....... soluong,dongia,Tienthanhtoan:=integer;
4. ....... Phi=1000;
5. ..........
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
10. Tienthanhtoan = soluong*dongia+phi;
11. ............
12. End.
giúp mik vs các bạn!
1. Program Tinh tien;
2. Uses crt
3. Var soluong,dongia,Tienthanhtoan:=integer;
4. Const Phi=1000;
5. Begin
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. Tienthanhtoan:= soluong*dongia+phi;
10. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
11. Readln;
12. End.