Câu 1 Tìm lỗi sai của các câu sau và sửa lại cho đúng a) Var 50a:Integer; b) For i:=200 to 1 do write('X'); c) S:=0; while s:=5 do s:=s+5; d) Var tb:array(1,50) of real;

Các câu hỏi liên quan