Cần gấp để nộp. Tin học Bài Tập về nhà:
Cho bài toán 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 thuật toán và viết chương trình để giải bài Toá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.
Uses crt;
Var Shcn :real;
Begin
clrscr;
Writeln(‘Dien tich hinh chu nhat = ‘);readln(Shcn);
Write(‘Tong dien tich hai thua ruong la ‘,Shnc+(10.5*10.5):3:2);
Readln;
End.