дан радиус круга. вычислить площадь и длину окружности этого круга в паскале ABC

Ответы:

var r:word,

begin

read(r),

write(6,28*r, ,3,14*r*r),

end.