Sửa lỗi chương trình: Chương trình lỗi: Uses crt Begin Write('a=');Readln(A); S=ab; P=ab/2 Write('chuvi=',P,'dientich=',S) End (Mọi người ghi đúng dấu chấm phẩy, phẩy, kép, .. hộ em nhaa)

1 câu trả lời

Sửa lỗi: Sau Uses crt thêm dấu ;

Khai báo các biến a,b,P,S : Var a,b,S:integer; Var P:real;

Sửa Write('a=');Readln(A); thành Write('a=');Readln(a);

Thiếu lệnh nhập b, thêm: Write('b=');Readln(b);

S=ab; sửa thành S:=a*b;

P=ab/2 sửa thành P:=a*b/2;

End sửa thành End.

Viết lại:

Uses crt;

Begin

Write('a=');Readln(a);

Write('b=');Readln(b);

S:=a*b;

P:=a*b/2;

Write('chuvi=',P,'dientich=',S);

End.

Câu hỏi trong lớp Xem thêm