Дан радиус круга. вычислить площадь и длину окружности этого круга в паскале ABC
Var r:word; begin read(r); write(6,28*r,' ',3,14*r*r); end.