program chu_vi; var f,g:text; a,b,c:integer; begin Assign(f,’TamGiac.inp’); reset(f); Assign(g,’TamGiac.out’); rewrite(g); readln(f,a,b,c); write(g,a+b+c); close(f); close(g); end. *ý nghĩa: -Ban đầu khởi tạo tệp inp và out -Sau đó đọc 3 cạnh của tam giác có trong tệp f -Ghi chu vi của tam giác là tổng 3 cạnh và tệp g -Cuối cùng đóng 2 tệp là và kết thúc chương trình. Trả lời