Viết chương trình nhập vào bán kính của hình tròn. Tính và in ra màn hình chu vi và diện tích của hình tròn
Giải thích đầy đủ với ạ 🙂
Không cop ,câu nhiều điểm mà cop thì kì lắm .-.
Viết chương trình nhập vào bán kính của hình tròn. Tính và in ra màn hình chu vi và diện tích của hình tròn
Giải thích đầy đủ với ạ 🙂
Không cop ,câu nhiều điểm mà cop thì kì lắm .-.
Program NhatNgu;
Uses crt; //Khai bao thu vien
Const pi=3.14; //Gan gia tri cua hang pi=3.14
Var r,cv,dt: real; //Khai bao bien o dang so thuc
Begin
Clrscr;
Write(‘Nhap ban kinh: ‘); Readln(r); //Nhap do dai ban kinh tu ban phim
cv:=2*r*pi; //Cong thuc tinh chu vi hinh tron
dt:=r*r*pi; //Cong thuc tinh dien tich hinh tron
Writeln(‘Chu vi = ‘,cv:0:2);
Write(‘Dien tich = ‘,dt:0:2);
Readln
End.
Program tich_chu_vi_dien_tich_hinh_tron;
uses crt; //Khai bao thu vien
var r,dien_tich,chu_vi:real; //Khai bao bien
begin
clrscr;
//Input:
write(‘Nhap ban kinh: ‘);readln(r);
//Output:
chu_vi:=r*2*pi;
dien_tich:=r*r*pi;
writeln(‘Chu vi: ‘,chu_vi:0:5);
writeln(‘Dien tich: ‘,dien_tich:0:5);
readln
end.