Tin học 11 pascal

[Lê Thị Hàn]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

mọi người ơi, giúp với, mình k bt sửa lỗi ở đâu ý, con trỏ nhấp nháy chỉ vào dòng writeln mà mình vẫn kb phải sửa thế nào, cần gấp lắm, giúp vs ạ

 

[Deathheart]

mọi người ơi, giúp với, mình k bt sửa lỗi ở đâu ý, con trỏ nhấp nháy chỉ vào dòng writeln mà mình vẫn kb phải sửa thế nào, cần gấp lắm, giúp vs ạView attachment 84549

đây nha lỗi đó nghĩa là bạn chưa khai báo biến nhưng ở đây bạn sai ở chỗ writeln và sửa lại (mấy cái sau tương tự nha):
writeln("tong= ");
đó bạn thiếu dấu ngoặc kép nên máy sẽ k nhận ra đó là văn bản bạn muốn hiển thị trên màn hình ^^

 

[Code11]

sai rất nhiều!!
sửa lại:

var
a,b:integer;
tong,hieu,tich:longint;
thuong:real;
begin
write('a,b');readln(a,b);
tong:=a+b;
hieu:=a-b;
tich:=a*b;
thuong:=a/b;
writeln('Tong=',tong,' Hieu=',hieu,' Tich=',tich,' Thuong=',thuong:2:3);
readln;
end.