Дан радиус окружности.Найти длину окружности и площадь круга(код Pascal) Помогите!

Question

Дан радиус окружности.Найти длину окружности и площадь круга(код Pascal)
Помогите!

Answer 1

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var r:=ReadReal('r=');
  Writeln('С=',2*Pi*r:0:5,', S=',Pi*r*r:0:5)
end.

Пример
r= 3.5
С=21.99115, S=38.48451

Comments

Спасибо!