Ngày tải lên :
05/02/2015, 16:00
... ',deu,' tam giac deu'); ',deu,' writeln(g,'co ',can,' tam giac can'); writeln(g,'co ',vuong,' tam giac vuong'); close(f);close(g); end Ví Dụ Tệp văn chứa tọa độ đỉnh tam giác file-opentamgiac.datVào ... program bai4b; bai4b uses crt; var x,y,z,a,b,r:real; begin clrscr; write('Nhap x: ');readln(x); write('Nhap y: ');readln(y); write('Nhap toa tam hinh tron: '); readln(a,b); write('Nhap ban kinh ... -***** program ttamgiac; uses crt; eps=1.0econst eps=1.0e-6; type diem=record x, y:real; end; tamgiac=record a, b, c:diem; end; var T:tamgiac; d, cn, v: boolean; n, i, deu,...