1 câu trả lời
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.