viết chương trình nhập vào bán kính của hình tròn . tính chu vi và diện tích của hình tròn đó ( biết diện tích hình tròn S=pi*r^2 chu vi C=2*pi*r)

2 câu trả lời

Program dientich;
Uses crt;
Const pi = 3.14;
Var r, S, C :real;
Begin
Clrscr;
Write('Nhap ban kinh r: ');
Readln(r);
S := r*r*pi;

C := 2 *pi*r
Writeln(' dien tich hinh tron la :', S:8:2);

Writeln(' chu vi hinh tron la :', C :8:2);
Readln
End.

program dgtron;

var r,pi: real;

begin

readln(r);

pi := 3,14;

write(' Chu vi hình tròn :', r*2*pi);

write(' Dienj tích hình tròn:', r*r*pi);

readln

end.

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