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.
– 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.