viết chương trình cho phép tính diện tích các hình: hình vuông, hình chữ nhật, hình tròn, hình tam giác, hình thang. người dùng chọn hình cần tính diện tích từ bản chọn, sau đó khai báo các thông số liên quan và nhận được diện tích của hình:

quang.nguyen_000

2 năm trước

viết chương trình cho phép tính diện tích các hình: hình vuông, hình chữ nhật, hình tròn, hình tam giác, hình thang. người dùng chọn hình cần tính diện tích từ bản chọn, sau đó khai báo các thông số liên quan và nhận được diện tích của hình: MOI BAN CHON HINH CAN TINH DIEN TICH 1.Hình vuông 2.Hình chữ nhật 3.Hình tròn 4.Hình tam giác 5.Hình thang. muốn tính diện tích hình tam giác người dùng gõ số 4 và khai báo đường cao, đáy. Chương trình tính và thông báo diện tích đến người dùng.

Loga Sinh Học lớp 12

0 lượt thích 21 xem

1 trả lời

Thích Trả lời

nguyenanhdao

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

uses crt;
const pi=3.14;
var a,b,c,n:longint;
begin
clrscr;
writeln('1.Hinh vuong');
writeln('2.Hinh chu nhat');
writeln('3.Hinh tron');
writeln('4.Hinh tam giac');
writeln('5.Hinh thang');
repeat write('Moi ban chon hinh muon tinh dien tich (1->5): ');readln(n);
until (0<n) and (n<6);
case n of
1:
begin
write('Nhap canh: ');readln(a);
write('Dien tich hinh vuong la: ',a*a);
end;
2:
begin
write('Nhap canh thu nhat: ');readln(a);
write('Nhap canh thu hai: ');readln(b);
write('Dien tich hinh chu nhat: ',a*b);
end;
3:
begin
write('Nhap ban kinh: ');readln(a);
write('Dien tich hinh tron: ',(pi*a*a):0:2);
end;
4:
begin
write('Nhap duong cao: ');readln(a);
write('Nhap canh ung voi duong cao: ');readln(b);
write('Dien tich hinh tam giac: ',((a*b)/2):0:2);
end;
5:
begin
write('Nhap canh day thu nhat: ');readln(a);
write('Nhap canh day thu hai: ');readln(b);
write('Nhap chieu cao: ');readln(c);
write('Dien tich hinh thang: ',(((a+b)/2)*c):0:2);
end;
end;
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

lequynhchi3938

uses crt;
var n,a,b,c:real;
begin
clrscr;
writeln('MOI BAN CHON HINH CAN TINH DIEN TICH: ');
writeln('1. Hinh vuong.');
writeln('2. Hinh chu nhat.');
writeln('3. Hinh tron.');
writeln('4. Hinh tam giac.');
writeln('5. Hinh thang.');
readln(n);
if n=1 then
begin
write('Canh:');readln(a);
writeln('Dien tich: ',a*a:0:2);
end else
if n=2 then
begin
write('Chieu dai:');readln(a);
write('Chieu rong:');readln(b);
writeln('Dien tich: ',a*b:0:2);
end else
if n=3 then
begin
write('Ban king:');readln(a);
writeln('Dien tich: ',a*a*3.14:0:2);
end else
if n=4 then
begin
write('Duong cao:');readln(a);
write('Day:');readln(b);
writeln('Dien tich: ',a*b/2:0:2);
end else
if n=5 then
begin
write('Day tren:');readln(a);
write('Day duoi:');readln(b);
write('Duong cao:');readln(c);
writeln('Dien tich: ',c/2*(a+b):0:2);
end;
readln
end.

//////////////////////////////////////////////////////////////////////

Test:

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

vẽ anime nam ngầu nhé ko app phải ngầu ớ nha

trong mp Oxy cho A(2;0) và đường thẳng d có phương trình: x+y-2=0 tìm anh của A và d qua phép quay tâm O góc $90^{0}$ ( $Q_{o,90^{0}}$ )

Gió bỗng thổi ào, mây thấp lối Buồm căng muốn rách, nước trôi nhanh Trên đường cát bụi vùng theo gió Nón mới cô kia lật nửa vành Ếch gọi nhau hoài tự mấy ao Trên bờ, cây hoảng hốt lao xao Đò ngang vội vã chèo vô bến Lớp lớp tràn sông đợt sóng trào Buồm rơi trơ lại cột tre gầy Loang loáng chân trời chớp xé mây chim lẻ vội vàng bay nhớn nhác Mưa gieo nặng hột xuống sông đầy Từ nội dung bài thơ trên và qua thực tế em hãy viết 1 bài văn miêu tả mưa trên sông. theo dàn ý dưới đay

GIÚP MÌNH VỚI VỚI! Năm nay là sinh nhật thứ 12 của Hoa. Mặc dù nhà Hoa rất nghèo nhưng Hoa muốn ba mẹ tổ chức sinh nhật thật linh đình ở 1 nhà hàng hàng sang trọng và mời thật đông bạn bè tới tham dự. Em hãy đưa ra nhận xét của mình về bạn Hoa trong tình huống trên.

Vẽ anime nam. Vó màu hay không thì tuỳ.

Cho hình thang cân ABCD ( AB // CD) biết AB= 26cm ,AD= 10cm và đường chéo AC vuông BC. Tính diện tích hình thang ABCD Vẽ hinh cho mình nha. Cảm ơn nhiều.

Viết đoạn văn ngắn nêu suy nghĩ của em về vấn đề gia tăng dân số hiện nay.

Write the correct form or tense of verb in bracket 1.City government need .......................(find) a solution to reduce traffic jams 2.They don't mind .........................(help) the people who are in need

Giải giúp tôi cần gấp giúp tôi với

vẽ giúp cưm pic anime : girl ko app đẹp ko đẹp = 1*

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến