Question

Hãy viết chương trình để tính diện tích của hình sau biết a,b,c được nhập từ bàn phím :

- Mình sẽ tặng GP cho những bạn có câu trả lời đúng.

Answer 1

chiều rộng là a

Answer 2

Program CT_Dien_Tich;

Uses crt;

Var a,b,c S₁,S₂,S : real;

Begin

CLRSCR;

Write ('Nhap 3 so a, b, c'); Readln (a,b,c) ;

S₁:= a*b;

S_{2:= 1/2 *a*c;}

S:= S₁+S₂;

Write ('S=',S:5:3);

Readln;

End.

Answer 3

Program Tinh_dien_tich;

Uses Crt;

Var a, b, c, cn, tg, S: Real;

Begin

Clrscr;

Writeln(' Nhap a, b de tinh hcn =');

Readln(a,b);

Writeln('Nhap a, c de tinh tg =');

Readln(a,c);

cn := a*b;

tg:= (a*c)/2;

S:= tg + cn;

Writeln('Vay dien tich hinh tren la =',S:0:1);

Readln;

End.