Cho các biến R,S kiểu thực.Viết lệnh gán tích diện tích hình tròn và bán kính
2 câu trả lời
Cho các biến R,S kiểu thực.Viết lệnh gán tích diện tích hình tròn và bán kính
Ta có, bán kính bằng một nữa đường kính theo công thức: R = d/2
<=> R = 16/2 = 8 cm
S hình tròn C: S = πR2 = 3,14.82 = 200,96 cm2
Chúc bạn học tốt
Cho mình xin 5 sao cảm ơn và câu trả lời hay nhất
Program hinhtron;
Uses crt;
Var R,S:real;
Begin
Clrscr;
Write('Ban kinh='); Readln(R);
S:=R*R*3.14*R;
Writeln('Tich dien tich hinh tron va ban kinh:',S:9:2);
Readln
End.
**************************
Ở trên là cả một chương trình,nếu chỉ có một lệnh gán thôi thì:
S:=R*R*3.14*R;
Câu hỏi trong lớp
Xem thêm
