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