Vẽ hình, viết thuật toán và chương trình Pascal tính diện tích hình thang với đáy lớn, đáy nhỏ, chiếu cao là các số nguyên được nhập từ bàn phím. đè 2 nha mọi người giúp mình với
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
- Datdoan03
- Câu trả lời hay nhất!
- 23/06/2020
- Cám ơn 3
XEM GIẢI BÀI TẬP SGK TIN 8 - TẠI ĐÂY
- lý thuyết
- trắc nghiệm
- hỏi đáp
- bài tập sgk
1. viết chương trình tính diện tích hình thang với đáy nhỏ a , đáy lớn b, chiều cao h
2. viết chương trình tìm số lớn nhất trong 2 số a,b nhập vào từ bàn phím
3. viết chương trình kiểm tra số nguyên dương N nhập từ bàn phím là số chẵn hây lẻ
Các câu hỏi tương tự
| Trịnh Quang Đức |
24/12/2017 17:38:55 |
1/ Trả lờiProgram TAM_GIAC; uses crt; var a,b,c,p,S: real; Begin clrscr; Write['Nhap canh a:'];readln[a]; Write['Nhap canh b:'];readln[b]; Write['Nhap canh c:'];readln[c]; p:=[a+b+c]/2; S:=sqrt[p*[p-a]*[p-b]*[p-c]]; Write['Dien tich tam giac la:',s:10:2]; readln
end.
| Len |
24/12/2017 17:39:18 |
Bài 1 :Program TAM_GIAC; uses crt; var a,b,c,d,p,S: real; Begin clrscr; Write['Nhap canh a:'];readln[a]; Write['Nhap canh b:'];readln[b]; Write['Nhap canh c:'];readln[c]; d:=a+b+c p:=[a+b+c]/2; S:=sqrt[p*[p-a]*[p-b]*[p-c]]; Write['Chu vi tam giac la:',D:10:2]; Write['Dien tich tam giac la:',s:10:2]; readln
end.
| Len |
24/12/2017 17:39:56 |
@Trịnh Quang Đức bạn ơi tính chu vi nữa mà? copy mà không nhìn à?
| Len |
24/12/2017 17:41:48 |
Program hinh_thang;uses crt;var a,b,c,S: real;Beginclrscr;Write['Nhap day be a:'];readln[a];Write['Nhap day lon b:'];readln[b];Write['Nhap chieu cao c:'];readln[c];S:=[a+b]*c/2Write['Dien tich hinh thang la:',s:10:2];readln
end.
| Len |
24/12/2017 17:48:03 |
Ad ơi bạn Trịnh Quang Đức bài 1 làm thiếu phần chu vi vẫn được cộng điểm ạ? Còn em có đầy đủ sao không được cộng ạ
| Trịnh Quang Đức |
24/12/2017 17:50:07 |
2/ Trả lờiProgram Dien_tich_hinh_thang;Uses crt;Var a,b,c:integer;Begin clrscr; write['nhap do dai cua day lon :']; readln[a]; write['nhap do dai cua day nho :']; readln[b]; write['nhap do dai cua chieu cao :']; readln[c]; writeln['tong hai canh day']; writeln[a,'+',b,'=',a+b]; writeln['tong hai canh day nhan voi chieu cao']; writeln[a+b,'*',c,'=',[a+b]*c]; writeln['dien tich hinh thang']; writeln[[a+b]*c,'/',2,'=',[[a+b]*c]/2:5:2]; readln;
End.
| Phạm Susu |
24/12/2017 18:21:32 |
Z câu nào đúng z m ban nói mk zs
Yêu cầu: Viết chương trình tính diện tích hình thang
- Input: Nhập đáy lớn, đáy nhỏ, chiều cao hình thang
- Output: In ra màn hình diện tích hình thang
Program Hinh_thang; Var a,b,h:Integer; S:Real; Begin Writeln['CHUONG TRINH TINH DIEN TICH HINH THANG']; Write['Cho biet day nho hinh thang: ']; Readln[a]; Write['Cho biet day lon hinh thang: ']; Readln[b]; Write['Cho biet chieu cao hinh thang: ']; Readln[h]; S := 0.5 * [a + b] * h; Writeln['Dien tich hinh thang = ',S:6:2,' met vuong']; Readln End.
Bước 1. Nhập thông tin:
Bước 2. Xử lý:
- Bước 1.1. Nhập độ dài đáy lớn của hình thang
- Bước 1.2. Nhập độ dài đáy nhỏ của hình thang
- Bước 1.3. Nhập chiều cao của hình thang
Bước 3. In ra màn hình diện tích hình thang.
- Bước 2.1. Tính diện tích hình thang bằng công thức \[S = \dfrac{{\left[ {a + b} \right]h}}{2}\]
Kết luận: ⦿ Để viết bài này các bạn cần áp dụng các câu lệnh writeln và công thức tính diện tích hình thang ⦿ Công thức diện tích hình thang: \[S = \dfrac{{\left[ {a + b} \right]h}}{2}\] a: Độ dài đáy nhỏ b: Độ dài đáy lớn h: chiều cao hình thang