Viết chương trình tính diện tích hình tròn với bán kính (R) nhập vào từ bàn phím. Biết công thức tính diện tích hình tròn: S = pi.R2, trong đó: pi = 3,14.
2 câu trả lời
Program Hinh_tron;
Uses crt;
Var r, S : real;
Const pi = 3.14;
Begin
Clrscr;
Write ('Nhap ban kinh hinh tron: ');Readln (r);
S := r*r*pi;
Writeln('Dien tich hinh tron la :', S:8:2);
Readln
End.
Program bt;
Uses crt;
Var r,S,pi:real;
Begin
pi:=3,14;
Write ('Ban kinh la');
Readln (r);
S:=r*r*pi;
Writeln ('Dien tich la',S);
Readln;
End.
cho mik xin hay nhất nhé
Câu hỏi trong lớp
Xem thêm