Найти длину окрукружности иплощадь круга заданного - вопрос №85634772 от begk55 10.11.2020 01:02

Question

Информатика: Найти длину окрукружности иплощадь круга заданного радиуса l=2pr s=prв кводрате

begk55 · Answer

// 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