Viết chương trình pascal tính diện tích của hình thang biết đáy nhỏ, đáy lớn và chiều cao được nhập từ bàn phím.
2 câu trả lời
program hinh_thang;
uses crt;
var a, b, h, s : real;
begin
clrscr;
write('nhap do dai day be hinh thang :');readln(a);
write('nhap do dai day lon hinh thang :');readln(b);
write('nhap chieu cao hinh thang :');readln(h);
s := ((a + b)*h)/2;
writeln('dien tich hinh thang la :', S:8:2);
readln
end.
Program Baitap;
Uses crt;
Var a,b,h:real;
Begin
Clrscr;
Write('Day nho='); Readln(a);
Write('Day lon='); Readln(b);
Write('Chieu cao='); Readln(h);
Writeln('Dien tich hinh thang:', h*(a+b)/2:9:3);
Readln
End.
Câu hỏi trong lớp
Xem thêm
- Đề 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
