Составьте программу длины окружности заданной r=5,782
Пример:
Буду очень благодарна.

{r=5,782}var Pi, C , r:real;beginr:=5.782; Pi:=3.1415926;C:= 2 * Pi * r;write(r:6:3,' ', C:9:6);end.