//Example number 2.7, Page number 34

clc;clear;
close;

// Variable declaration
r=poly([0],'r')

// Calculation
a=4*r/sqrt(2);
R=(4*r/(2*sqrt(2)))-r

// Result
printf( "maximum radius of sphere is ")
disp(R)