Xác định bài toán :

- Input : bán kính r hình tròn

- Output : chu vi và diện tích hình tròn

Mô tả thuật toán :

- Bước 1 : nhập bán kinh r

- Bước 2 : cv ← 2 * r * 3.14

- Bước 3 : s ← r * r * 3.14

- Bước 4 : xuất giá trị s và cv

- Bước 5 : kết thúc

Viết chương trình :

uses crt;

var r, cv, s : real;

begin

clrscr;

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

cv := 2 * r * 3.14;

s := r * r * 3.14;

writeln('chu vi = ', cv:2:1);

writeln('dien tich = ', s:2:1);

readln

end.

$Input$ bán kính $R$

$Output $ Chu vi $P$ và diện tích $S$

*Thuật toán

B1:Nhập $R$

B2: $P<- R*2*3,14; S<- R^2*3,14$

B2: in ra kq và kết thúc thuật toán

*Chương trình

Program Hotboy ;

Uses crt;

Var R,P,S : real;

Begin

Clrscr;

S:=1;

P:=0;

Write('nhap R');

Readln(R);

P:=R*2*3.14;

S:=sqr(R)*2,14;

Write('chu vi la',P,'dien tich la',S);

Readln

End.