3768/CH2/EX2.7/Ex2_7.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

//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)