viết chương trình tính chu vi hình tròn

2 câu trả lời

Program CV_hinh_tron

Var   R: integer ;

        S,C : real;

Const   Pi=3,14;

Writeln(‘Nhap ban kinh‘);

Readln(R);

C:=r*r*3,14

Writeln(‘Chu vi la C= ‘,C);

Readln

End.

Program bai_lam;

uses crt;

var a,CV:integer;

Begin

Write('nhap gia tri cho duong kinh');readln(a);

CV:=a*3,14

Write('chu vi hinh tron la:',CV);

Readln;

End.