Có 1 thửa đất hình vuông có cạnh 10,5m và 1 thửa đất hình chữ nhật mà diện tích được nhập từ bàn phím. Tính tổng diện tích của 2 thửa đất. Em hãy nêu các khai báo cần thiết trong chương trình. Em hãy trình bày thực toán và viết chương trình để giải bài toán trên.

1 câu trả lời

- Các khai báo cần thiết:

S: Tổng diện tích

SC: Diện tích hình chữ nhật

SV: Diện tích hình vuông

- Thuật toán:

Bước 1: Nhập SC

Bước 2: SV ← 10.5*10.5

Bước 2: S ← SC + SV

Bước 3: Xuất kq

- Chương trình:

Program BTT;
Uses crt;
Var S,SC,SV: real;
Begin
        Clrscr;
        Write('Nhap dien tich hinh chu nhat: '); Readln(SC);
        SV:=10.5*10.5;
        S:=SC+SV;
        Write('Tong dien tich la: ',S:0:2);
        Readln
End.