Viết chương trình pascal tính chu vi, diện tích của hình tròn với pi=3,14 bán kính R nhập từ bàn phím
2 câu trả lời
Program FNG;
Uses crt;
Const pi=3.14;
Var r,p,s: extended;
Begin
Clrscr;
Write('Nhap r: '); Readln(r);
p:=2*r*pi;
s:=sqr(r)*pi;
Writeln('Chu vi: ',p:0:2);
Write('Dien tich: ',s:0:2);
Readln
End.
Uses crt;
var r,cv,dt: real;
begin clrscr;
Writeln('Nhap ban kinh ='); readln(r);
cv := 2*pi*r;
dt :=pi*r*r;
Writeln('Dien tich hinh tron la',dt,'chu vi hinh tron la',cv);
readln
end.
Câu hỏi trong lớp
Xem thêm