Câu hỏi:

13/07/2026 73

Viết chương trình tính diện tích hình chữ nhật, tam giác, hình bình hành, hình thang trong pascal

Xem lời giải

Câu hỏi trong đề: Trắc nghiệm tổng hợp Tin học năm 2023 có đáp án !!

Giao bài

Quảng cáo

Trả lời:

Giải bởi Vietjack

* Tính diện tích hình chữ nhật

program dthcn;

var

a, b, c : integer;

begin

Write ('Nhap chieu dai:'); read (a);

Write ('Nhap chieu rong:'); read (b);

s := a * b;

Write ('Dien tich hinh chu nhat la:',s);

Readln

End.

* Tính diện tích hình thang

program dtht;

var

a, b, h:Integer;

s:real;

begin

Write('Nhap day lon:');readln(a);

Write('Nhap day nho:');readln(b);

Write('Nhap chieu cao:');readln(h);

s:=((a+b)*h)/2;

WriteLn ('Dien tich hinh thang la:',s);

readln

end.

* Tính diện tích tam giác

program dttg;

var

a, h : integer;

s : real;

begin

Write ('Nhap chieu cao:'); read (h);

Write ('Nhap day:'); read (a);

s := 1/2 * a * h;

Write ('Dien tich tam giac la:',s);

Readln

End.

* Tính diện tích hình bình hành

program dthbh;

var

a, h : integer;

s : real;

begin

Write ('Nhap chieu cao:'); read (h);

Write ('Nhap day:'); read (a);

s := a * h;

Write ('Dien tich hinh binh hanh la:',s);

Readln

End.

* Tính diện tích hình tròn

program dthtr;

const

pi=3.14;

var

r:Real;

s:Real;

begin

Write('Nhap ban kinh:'); readln(r);

s:=r*r*pi;

write('Dien tich hinh tron:',s);

readln

end.

Đang tải chế độ Học...

Hot: 1000+ đề thi giữa kì 1 lớp 1-12 đầy đủ các môn (Update 2026) (chỉ từ 60k). Tải ngay

ĐẶC QUYỀN VIP

Đăng ký VIP để học và luyện thi không giới hạn

Trọn bộ quyền lợi trên Vietjack, trong một tài khoản.

Phòng luyện thi cấp tốc: ĐGNL - ĐGTD, Tốt nghiệp THPT, Ôn vào 10, Ôn vào 6, Ôn Giữa kì/Cuối kì
Hơn 200K đề thi thử, đề minh hoạ, chính thức các năm
Với 3tr+ câu hỏi theo các mức độ Nhận biết, Thông hiểu, Vận dụng
Tải xuống đề thi [DOCX] với đầy đủ đáp án
Xem hàng ngàn bài giảng đính kèm củng cố thêm kiến thức
Bao gồm tất cả các bậc từ Tiểu học đến Đại học
Chặn hiển thị quảng cáo tăng khả năng tập trung ôn luyện
Đăng ký ngay

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1

Viết chương trình Python cho phép nhập vào 3 số nguyên a,b, c. In ra màn hình số lớn nhất trong 3 số.

Xem đáp án

Lời giải

a = int(input("nhập số a :"))
b = int(input("nhập số b :"))
c = int(input("nhập số c :"))
max = a
if b > max :
max = b
if c > max :
max = c
print("giá trị lớn nhất là :", max)

Câu 2

Xây dựng các học liệu số phục vụ cho một hoạt động học trong kế hoạch bài dạy môn Toán có ứng dụng CNTT ở cấp Tiểu hoc đã có.

Xem đáp án

Lời giải

Các học liệu số phục vụ cho hoạt động học trong kế hoạch bài dạy môn Toán bài: Hình thoi Toán lớp 4.

- Hoạt động: Củng cố kiến thức , ôn luyện.

- Mục đích:

+ Giúp học sinh nhận dạng được thế nào là hình thoi.

+ Cách tính diện tích, chu vi của hình thoi.

+ Các tính chất của hình thoi.

- Các học liệu:

+ Powpoint.

+ Video.

+ Các nguồn web / link phục vụ trò chơi học tập: Quizz.

Câu 3

Giao thức Token Ring là một giao thức sử dụng phương pháp điều khiển kiểu:

A. Hỏi vòng (Polling)

B. Giữ chỗ trước(Reservation)

C. Truy cập ngẫu nhiên không sử dụng khe thời gian (Stochastic without time slot).

D. Truy cập ngẫu nhiên sử dụng khe thời gian (Stochastic with time slot).

Lời giải