Mình giúp bạn câu 2 được không ạ, câu 1 là lí thuyết 

2.

program bai3;

uses crt; var r: integer;

              c,s: real;

Begin

clrscr;

write(‘Nhap ban kinh r=’); readln(r);

c:=2*pi*r;

s:= pi*r*r;

writeln(‘Chu vi duong tron bang’,c);

writeln(‘Dien tich hinh tron bang’,s);

readln;

End.

- Cấu trúc câu điều kiện dạng thiếu :

+ if <điều kiện> then <câu lệnh>;

- Hoạt động :

+ Điều kiện sẽ trả về giá trị đúng hoặc sai

+ Điều kiện sẽ được tính và kiểm tra

+ Nếu điều kiện đúng thì câu lệnh sẽ được thực hiện

+ Nếu điều kiện sai thì câu lệnh sẽ bị bỏ qua

- Cấu trúc câu điều kiện dạng đủ :

+ if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;

- Hoạt động :

+ Điều kiện sẽ trả về giá trị đúng hoặc sai

+ Điều kiện sẽ được tính và kiểm tra 

+ Nếu điều kiện đúng thì câu lệnh 1 sẽ được thực hiện và câu lệnh 2 được bỏ qua

+ Nếu điều kiện sai thì câu lệnh 1 sẽ được bỏ qua và thực hiện câu lệnh 2