Дан радиус окружности. Найти длину окружности и площадь круга.

Question

Дан радиус окружности. Найти длину окружности и площадь круга.

Comments

Прогу? Блох-схему?

---

Прогу

---

На Паскале?

---

да

Answer 1

Var
R:real;
Begin
Write('R = ');ReadLn(R);
WriteLn('L = ',2*Pi*R);
WriteLn('S = ',Pi*R*R);
End.

Comments

спасибо