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;BeginClrscr;Write(‘nhap x ’); read(x);Write(‘nhap y’); -in tb: nhap yread(y); - nhập gt cho y từ bàn phímSx+y; - thêm :If (x+y 10) then write(‘hop le’) else write(‘ko hop le’);Readln; End.
Đọc tiếp
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.
