a) uses crt;

b) var dt, r: real;

c) Thiếu readln(r);

d) dt:= pi*sqr(r);

Lỗi 1: Dòng uses : crt; - Lỗi cú pháp do dấu hai chấm : không cần thiết. Sửa lại thành uses crt;.

Lỗi 2: Dòng var dt, r = real; - Lỗi khai báo biến không đúng cú pháp. Sửa lại thành var dt, r: real;.

Lỗi 3: Dòng clrscr; - Lỗi cú pháp do sử dụng hàm clrscr trong môi trường không hỗ trợ. Nếu muốn xóa màn hình, có thể sử dụng clrscr trong IDE hoặc xóa dòng này nếu không cần thiết.

Lỗi 4: Dòng writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2); - Lỗi cú pháp do sử dụng sai định dạng khi in giá trị. Sửa lại thành writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2:2); để in diện tích với đúng định dạng số thập phân.

a) Program chuvi_duongtron;

b) const pi = 3.14;

c) readln(r);

d) Thiếu End.

a) Program chuvi_duongtron;

b) const pi = 3.14;

c) write(‘nhap ban kinh r = ‘);

d) Thiếu End.

a) uses crt;

b) var dt, r: real;

c) Thiếu Begin

d) dt:= pi*sqr(r);

program chuong_trinh thiếu chấm phẩy

Sửa lại: program chuong_trinh;

Sai ở chỗ vị trí đặt của Uses crt; Thiếu chấm phẩy sau lệnh Writeln và sai chính tả chữ Reason

Sửa lại: 

program chao;

uses crt;

begin

writeln('Chao cac ban');

readln;

end.

Program Tinh _gia_tri_bieu_thuc;

 Uses CRT;

Var x: Real;

Begin

Clrscr;

​readln(x);

Writeln(‘Gia tri bieu thuc 12*x – 30 + 12 = ’ , 12 *x – 30 + 12: 5:3');

Write(‘Nhap gia tri x:  ’); 

            Readln

            End.

* Program cau 1 phải trước uses crt;

Var toan; van; tbc; anh, interger; ( Sai )

=> Var toan, van, tbc, anh: integer;

* Begin phải trước lệnh clrscr;

Bổ sung thêm nhé!

Sau lệnh readln ( toan ) phải có dấu; 

=> readln ( toan );

Tương tự các lệnh readln ( van ) => readln ( van );

_______________ readln ( anh ) => readln ( anh );

-Thứ nhất thiếu tên chương trình

- Thứ 2 sai ở var a,b:=byte sửa lại thành a,b: byte;
- Thứ 3 sai ở const c:3; sửa lại thành const c=3;

-Trong pascal thiếu tên ct(vd: program baihoc;) thì ct vẫn chạy ok.

- var thì phải dùng ":" và thiếu ";". Sửa lại: var a,b:byte;

- const thì phải dùng "=". Sửa lại: const c=3;

-trong ct thiếu clrscr; thì ko sai nhưng sẽ rất khó nhìn.

-Sau readln thiếu ";". Sửa lại: readln;

Những chỗ sai được in đậm em nhé

program Hà 0908

uses crt;

begin

clrscr;

writeln('(2+9)(9+2)/(10+1)= '; (2+9)(9+2)/(10+1)= :4:2');

readln;

end.

Sửa lại như sau:

program Ha_0908;

uses crt;

begin

clrscr;

writeln('(2+9)(9+2)/(10+1)= ', (2+9)(9+2)/(10+1):4:2);

readln;

end.

sai nhu nay 

Hà 0908 ko ';'

writeln... =;4;2'); => ko co dau ' nay nha 

sai tên