Tìm và sửa lỗi(nếu có) trong đoạn chương trình.
Ví dụ:
Program 2hocki; ->hocki2;
Uses crt ->;
Var x, y, s= real; ->x, y, s: real;
Begin
Clrscr;
Write(‘nhap x= ’);
read(x);
Write(‘nhap y=’); ->in tb: nhap y=
read(y); -> nhập gt cho y từ bàn phím
S=x+y; -> thêm :=
If (x+y =10) then write(‘hop le’) else write(‘ko hop le’);
Readln;
End.