Question

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

Answer 1

var r:word;
begin
read(r);
write(6,28*r,' ',3,14*r*r);
end.