K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
15 tháng 11 2021
program chuong_trinh thiếu chấm phẩy
Sửa lại: program chuong_trinh;
22 tháng 3 2020
a)
*Các lỗi sai là:
-Sai thứ tự các lệnh (begin trước, uses crt sau)
-Program vd: thiếu dấu ;
-Writeln('Chao cac ban!'): thiếu dấu ;
-Sai thứ tự các lệnh(end trước readln sau)
-Readln: thiếu ;
*Sửa lại:
Program vd;
Uses crt;
Begin
Clrscr;
Writeln('Chao cac ban!');
Readln;
End.
b)
*Các lỗi sai là:
-Var a,b:=integer; Sai vì có dấu =
-Const c:=3; Sai vì có dấu :
-a:=200: Sai vì thiếu dấu ;
-b:=a/c: Biến b Sai kiểu dữ liệu;
-Writeln(b): Sai vì thiếu dấu ;
-Readln: Sai vì thiếu dấu ;
*Sửa lại:
Var a,b:integer;
Const c=3;
Begin
a:=200;
b:=a+c;
Writeln(b);
Readln;
End.
Var a,b:integer;
Const c =3;
Begin
a :=200;
b :=a/c;
write(b);
readln; (ủa readln cái j)
end.
Var a,b :integer; (bỏ dấu =)
Const c =3; (bỏ dấu :)
Begin
a :=200; (thêm ;)
b :=a/c;
write(b);
readln; (thêm ';' cơ mà read cái j)
end. (thêm '.')