Hãy ghép các khối lệnh dưới đây để thu được chương trình vẽ hai tam giác đều liên tiếp nhau.
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Tham khảo:
program ct;
uses crt;
var a,b,h,S:integer;
begin clrscr;
writeln('Nhap do dai hai day: '); readln(a,b);
writel('Nhap chieu cao: '); readln(h);
S:=h*((a+b)/2);
writeln('Dien tich hinh thang do la: ',S);
readln;
end.
uses crt;
var s,a,b,h:real;
begin
clrscr;
readln(a,b,h);
s:=(a+b)/2*h;
writeln(s:4:2);
readln;
end.
- Hình tam giác:
- Hình vuông:
- Đa giác năm cạnh:
- Hình sao năm cánh:
- Đường tròn:
- Hình tròn: