Viết chương trình nhập số nguyên R. Tính và xuất ra màn hình chu vi diện tích hình tròn với bán kính R. *Không phao trên mạng*
2 câu trả lời
program bai_giaiR;
uses crt;
var R:integer;
cv,dt:real;
begin
clrscr;
write('Nhap R: '); readln(R);
cv:=2*R*3.14;
dt:=R*R*3.14;
writeln('Chu vi: ',cv:0:2);
writeln('Dien tich: ',dt:0:2);
readln;
end.
uses crt;
var r:longint;dt,cv:real;
begin
clrscr;
write('nhap ban kinh hinh tron:');readln(r);
cv:=r*2*3.14;
dt:=r*r*3.14;
writeln('chu vi cua hinh tron do la:',cv);
write('dien tich cua hinh tron do la:',dt);
readln;
end.
