Đáp án: Giúp mk với mk đang gấp viết thuật toán và chương trình tính chu vi và diện tích hình thang cân Biết độ dài bằng 2 đáy a,b ;cạnh bên c và chiều cao h=b/3 - program b1;uses crt;var a,b,cinteger;p,s,hreal;beginwrite(ʹNhap do dai canh day thu nhat ʹ);read(a);Write(ʹNhap do dai canh day thu hai ʹ);read(b);Write(ʹNhap do dai canh ben ʹ);read(c);h=b/3;p=(2*a)+b+c;s=(h/2)*(a+b);write(ʹChu vi hinh thang can la ʹ,p30);writeln;Write(ʹDien tich hinh thang can la...

program b1;uses crt;var a,b,cinteger;p,s,hreal;beginwrite(ʹNhap do dai canh day thu nhat ʹ);read(a);Write(ʹNhap do dai canh day thu hai ʹ);read(b);Write(ʹNhap do dai canh ben ʹ);read(c);h=b/3;p=(2*a)+b+c;s=(h/2)*(a+b);write(ʹChu vi hinh thang can la ʹ,p30);writeln;Write(ʹDien tich hinh thang can la...

Hân Trân

1 năm trước

Giúp mk với mk đang gấp viết thuật toán và chương trình tính chu vi và diện tích hình thang cân .Biết độ dài bằng 2 đáy a,b ;cạnh bên c và chiều cao h=b/3

Xem đáp án

46 lượt xem

1 câu trả lời

Anh Tran

1 năm trước

program b1;
uses crt;
var a,b,c:integer;p,s,h:real;
begin
write('Nhap do dai canh day thu nhat ');read(a);
Write('Nhap do dai canh day thu hai ');read(b);
Write('Nhap do dai canh ben ');read(c);
h:=b/3;
p:=(2*a)+b+c;
s:=(h/2)*(a+b);
write('Chu vi hinh thang can la: ',p:3:0);writeln;
Write('Dien tich hinh thang can la: ',s:3:0);
Readln;
end.