Question

viết lập trình tính chu vi hình tròn trong pascal

Answer 1

Program Chu_Vi_Hinh_Tron;

uses crt;

var r: integer

begin

clrscr;

write('nhap ban kinh ='); readln(r);

writeln('chu vi hinh tron = ' , r*2*3.14);

readln

end.

Answer 2

Program CV_hinh_tron;

Var

r:Integer;

CV:Real;

Const

pi:3.14

Begin

Writeln('Nhap ban kinh');

Readln(r);

CV:=r*r*3.14;

Writeln('Chu vi hinh tron la ',CV:5:5);

Readln;

End.