a)

input: a là bán kính hình tròn, 2a là cạnh hình vuông

output: diện tích hình H

b)

b1: nhập a

b2: tính diện tích hình vuông

b3: tính diện tích hình tròn

b4: tính H= bằng cách lấy diện tích hình vuông trừ diện tích hình tròn

c)

uses crt;

var a,s1,s2,s: real;

begin

clrscr;

write ('nhap a: ');   readln (a);

s1:=sqr(2*a);

s2:=sqr(a)*Pi;

s:=s1-s2;

writeln ('dien tich hinh H la: ',s:1:2);

readln;

end.

Câu 1:

a) Xác định bài toán :

Input :  giá trị a

Output : tính diện tích hình H

b) Mô tả thuật toán

Bước 1 : Nhập a

Bước 2 : S1 <--- (2*a) * (2*a);

Bước 3 : S2 <--- (a*a*3.14);

Bước 4 : S <--- S1 - S2 ;

Bước 5 : Đưa giá trị S ra màn hình

Bước 6 : Kết thúc

c) Viết chương trình

program dien_tich;

uses crt;
var a , S1, S2, S : real;

const pi =3.14;
begin
clrscr;
write ('nhap gia tri a : '); readln(a);
S1 := (2*a)*(2*a);
S2 := a*a*pi;
S := S1 - S2 ;
writeln('dien tich hinh H la :', S :8:2);
readln
end.