Trang chủ
Tin học lớp 11, giải bài tập tin học lớp 11 - Để học tốt tin học 11

Câu 9 trang 36 SGK Tin học 11

Hãy viết chương trình nhập số a (a>0) rồi tính và đưa ra diện tích phần được gạch chéo trong hình 3 (kết quả làm tròn đến bốn chữ số thập phân).

Quảng cáo

Đề bài

Hãy viết chương trình nhập số a (a>0) rồi tính và đưa ra diện tích phần được gạch chéo trong hình 3 (kết quả làm tròn đến bốn chữ số thập phân).

Lời giải chi tiết

Nhận thấy 2 phần gạch chéo trong ô vuông tương đương với 2 phần bỏ trống. Như vậy diện tích phần gạch chéo bằng 1/2 diện tích hình tròn tâm O (0:0), bán kính R = a.

Ta lại biết rằng, diện tích hình tròn được tính theo công thức: S = R*R*/Pi; Pi≈3,1416. Khi đó, chương trình tính diện tích phần gạch là như sau:

Program dien_tich_phan_gach;

Uses crt;

Var a: real; Conts pi = 3,1416,

Begin

Clrscr,

Write('Nhap ban kinh duong tron a (a>0): ')

Readln(a) ,

write('Dien tich phan gach cheo la: ',a*a*pi/2:20:4);

Readln End .

Khi chạy chương trình, nếu a = 2 thì diện tích phần gạch là 6.2832;

nếu a = 3 thì diện tích phần gạch là 14.1372;

nếu a = 5 thì diện tích phần gạch là 3 1.8086

Kết quả chương trình như hình 1 dưới đây:

Loigiaihay.com

  • Câu 10 trang 36 SGK Tin học 11

    Lập trình tính và đưa ra màn hình vận tốc V khi chạm đất của một vật rơi từ độ cao h, biết rằng V = √2gh , trong đó g là gia tốc rơi tự do và g = 9.8 m/s2. Độ cao h (m) được nhập vào từ bàn phím.

  • Câu 8 trang 36 SGK Tin học 11

    Hãy viết biểu thức lôgic cho kết quả true khi tọa độ (x;y) là điểm nằm trong vùng gạch chéo kể cả biên của các hình 9.a và 9.b.

  • Câu 7 trang 36 SGK Tin học 11

    Hãy chuyển các biểu thức trong Pascal dưới đây sang biểu thức toán học tương ứng:

  • Câu 6 trang 35 SGK Tin học 11

    Hãy viết biểu thức toán học dưới đây trong Pascal:

  • Câu 5 trang 35 SGK Tin học 11

    Để tính diện tích S của hình vuông có các cạnh A với giá trị nguyên nằm trong phạm vi từ 100 đến 200, cách khai báo S nào dưới đây là đúng và tốn ít bộ nhớ nhất?

Quảng cáo
Báo lỗi - Góp ý

Tham Gia Group Dành Cho 2K8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí
close