Viết đoạn chương trình tính diện tích hình thang cân?
2 câu trả lời
program bai_giai;
uses crt;
var a,b,h:longint;
begin
clrscr;
write('nhap day be:');readln(a);
write('nhap day lon:');readln(b);
write('nhap chieu cao:');readln(h);
write('dien tich hinh thang can do la:',(a+b)*h*2);
readln;
end.
program Tinh_dien_tich_hinh_thang_can;
uses crt;
var a,b,h: Integer;
S: Real;
begin
clrscr;
write('nhap day be:');readln(a);
write('nhap day lon:');readln(b);
write('nhap chieu cao:');readln(h);
S:=((a+b)*h)/2;
write('dien tich hinh thang can do la:',S);
readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
