Lập chương trình tính diên tích hình tròn biết bán kính r lá số nguyên. S= π r2
2 câu trả lời
Program bai_tap;
Uses crt;
Const pi = 3.14;
Var r: integer;
S: real;
Begin
Writeln ('Nhap ban kinh r=');
Readln (r);
S:= pi*r*r;
Writeln ('Dien tich hinh tron la:', S:8:2);
Readln
End.
Uses crt;
Var r, s: real;
Const pi=3.14;
Begin
Clrscr;
Write('Nhap ban kinh, r = '); readln(r);
s:=pi*sqr(r);
Writeln('Dien tich hinh tron la: ',s:4:2);
Readln
end.
Câu hỏi trong lớp
Xem thêm