Một thửa ruộng hình chữ nhật có chiều dài là a chiều rộng là b bên trong thửa ruộng có một cái giếng nước hình tròn có bán kính R viết chương trình pascal tính diện tích đất trồng trọt

2 câu trả lời

var a,b,s,real:lognint;

begin

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

write('Nhap b: '); readln(b);

s:=a*b; 

d:=r*r*3,14; 

s:=s-d;

write('Dien tich trong trot la: ',s:0:4);

readln;

end.

Program hotboy;

uses crt;

var tron,s: real;

a,b,r: integer;

begin

Clrscr;

write('Nhap a: ');

readln(a);

write('Nhap b: ');

readln(b);

s:=a*b;

tron:=r*r*3.14;

s:=s-tron;

write('Dien tich trong trot la: ',s:2:2 );

readln

end.

Câu hỏi trong lớp Xem thêm