Mọi người giúp mình với: Viết chương trình tính diện tích và chu vi của hình tam giác theo độ dài a,b,c cho trước; Tin lớp 8 ạ

0 bình luận về “Mọi người giúp mình với: Viết chương trình tính diện tích và chu vi của hình tam giác theo độ dài a,b,c cho trước; Tin lớp 8 ạ”

1. uses crt;
   var a,b,c,p,S: real;Begin
   clrscr;
   Write(‘Nhap canh a:’);readln(a);
   Write(‘Nhap canh b:’);readln(b);
   Write(‘Nhap canh c:’);readln(c);
   p:=(a+b+c)/2;
   S:=sqrt(p*(p-a)*(p-b)*(p-c));
   Write(‘Dien tich tam giac la:’,s:10:2);
   readln;
   end.

   Bình luận

2. Program BTT;
   Uses crt;
   Var a,b,c,p,s: real;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);
           Write(‘Nhap b: ‘); Readln(b);
           Write(‘Nhap c: ‘); Readln(c);
           p:=(a+b+c)/2;
           s:=sqrt(p*(p-a)*(p-b)*(p-c));
           Writeln(‘Chu vi = ‘,2*p:0:2);
           Write(‘Dien tich = ‘,s:0:2);
           Readln
   End.

   Bình luận