Дан радиус окружности.найти длину окружности и площадь - вопрос №8233490 от karinasing 25.10.2021 20:46

Question

Информатика: Дан радиус окружности.найти длину окружности и площадь круга(код pascal) !

karinasing · Answer

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