Var a,b:byte; Procedure AK(x:byte; Var y:byte;); Begin Writeln(x,' ',y); X:=x+4; Y:=y+8; Writeln (x,' ',y); End; Begin a=5; b=7; TD(a;b); Writeln (a,' ',b); Readln. End. Sửa lỗi sai và cho biết kết quả

1 câu trả lời

lỗi:

- chưa xây dựng chương trình con có tên TD

- sau readln là dấu chấm

kết quả: chương trình báo lỗi

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