// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var r:=ReadReal('R=');
Writeln('Длина окружности ',2*Pi*R:0:5,', площадь круга ',Pi*R*R:0:5)
end.
Пример
R= 10.6
Длина окружности 66.60176, площадь круга 352.98935