cho tệp DULIEU.TXT gồm nhiều dòng, mỗi dòng gồm 3 số nguyên cách nhau bởi một dấu cách. hãy viết chương trình đọc dữ liệu từ tệp DULIEU.TXT, tính tổng các số trên mỗi hàng và in ra kết quả ra tệp DULIEU.TXT . b) kiểm tra xem 3 số trên mỗi dòng có phải là độ dài 3 cạnh của tam giác cân không và ghi kết quả vào tệp DULIEU.TXT
const fi=’dulieu.txt’;fo=’ketqua.txt’;var i,t:integer;f1,f2:text;a:array[1..9]of integer;beginassign(f1,fi); reset(f1);assign(f2,fo); rewrite(f2);t:=0;for i:=1 to 9 dobeginread(f1,a[i]);t:=t+a[i];end;writeln(f2,t);close(f1);close(f2);end.