CHO CHƯƠNG TRÌNH SAU

Câu 1. Cho chương trình sau: (Tính thành 5 câu) Var m,n,T : integer;Procedure TD (Var C: integer; x: byte);Var i: Byte;Begini:=3;  Writeln(C, ‘ ’,x);x:=x+i;C:=C+i;S:=x+C;Writeln(C, ‘ ’,x);End;Write(‘nh p m và n:’); Readln(m,n);ậTD(m,n);Writeln(m,’ ‘,n,’ ‘,T);End.