Tin 8

[QUANGHUY699]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Mô tả thuật toán tính diện tích hình chữ nhật. Viết chương trình đầy đủ.

 

[Nguyen Hanh Minh Khanh]

Mô tả thuật toán:
Bước 1: Nhập cr: chiều rộng
Bước 2: Nhập cd: chiều dài
Bước 3:Tính dt HCN=cd*cr
Bước 4: In kết quả ra màn hình.
Viết chương trình
Uses crt;
Var cd,cr,dt:longint;
Begin
Clrscr;
Write('nhap chieu dai, chieu rong');
Readln(cd,cr);
Dt:=cd*cr;
Write('dien tich HCN la ',dt);
Readln;
End.