viết phương trình tính diện tích hình tròn biết rằng Sht=r2*pi
2 câu trả lời
Program Chuongtrinh;
Uses crt;
Var r:integer;
Const pi=3,14;
Begin
Clrscr;
Write('Nhap ban kinh hinh tron:');
Readln(r);
Writeln('Dien tich hinh tron do la:', r*r*pi);
Readln
End.
viết phương trình tính diện tích hình tròn biết rằng Sht=r2*pi;
program baigiai;
uses crt;
var dt,pi:real;r:longint;
begin
clrscr;
write('nhap ban kinh hinh tron');readln(r);
pi:=3.14;
dt:=r*r*pi;
write('dien tich hinh tron do la:',dt);
readln;
end.
đây nha bạn
