Tại sao mình thử chạy CT này nó lại báo là “illegal uses of “:” ” vậy ạ?
Sửa ntn?
program tinhtiendien;
uses crt;
var cu,moi,a,b,c,d,tieuthu:longint;
begin
clrscr;
writeln(‘Nhap chi so cu’);readln(cu);
writeln(‘Nhap chi so moi’);readln(moi);
tieuthu:=moi-cu;
if tieuthu=0 then writeln(‘Khong phai tra tien’);
a:=tieuthu*10000;
b:=49*10000+(tieuthu-49)*12000;
c:=49*10000+50*12000+(tieuthu-99)*15000;
d:=49*10000+50*12000+100*15000+(tieuthu-199)*16000;
writeln(‘Chi so dien tieu thu:’,tieuthu);
if (tieuthu>0) and (tieuthu<50) then writeln('Tien dien thang nay la: ',a:1:0,' dong');
if (tieuthu>=50) and (tieuthu<100) then writeln('Tien dien thang nay la: ',b:1:0,' dong');
if (tieuthu>=100) and (tieuthu<200) then writeln('Tien dien thang nay la: ',c:1:0,' dong');
if (tieuthu>=200) then writeln(‘Tien dien thang nay la: ‘,d:1:0,’ dong’);
readln;
end.
ok mà sao đâu?
Bạn thử bấm vào lỗi rồi nhấn enter đi ạ xem con trỏ nó hiển ở đâu thì là nó bị lỗi ở trước con trỏ đó ạ
nếu nằm ở đầu dòng thì có nghĩa là bị lỗi ở cuối dòng phía trên ạ
Theo mình hình như bạn sai k phải là longint mà là real nha bạn