... VUONG'); Writeln(' theo dinh ly Pithagore');Write('-Nhap canh a = ');Readln(a);Write('-Nhap canh b = ');Readln(b);c := Sqrt((a*a) + (b*b));Writeln('*Canh ... Writeln(' ');Repeat Write('-Nhap he so a= '); Readln(a); Until a <>0; Write('-Nhap he so b= '); Readln(b); Write('-Nhap he so c= '); Readln(c); ... GIAO TRINH LY THUYET VA BAI TAP TURBO PASCAL-CHUONG 1Dang Thanh Tuan(15/3/2004)**********0101**********Program PTB2;Vara,b,c:Integer; delta,x1,x2:Real;BeginWriteln('GIAI PHUONG...