blob: 9ec548571cd63dbef90db48d2b82294c6a4da4ad (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
//Example number 6.8, Page number 6.48
clc;clear;close
// Variable declaration
r=poly([0],'r')
// Calculation
a1=4*r/sqrt(3); // in m
R1=(a1/2)-r; // radius of largest sphere
a2=4*r/sqrt(2); //in m
R2=(a2/2)-r; // maximum radius of sphere
// Result
disp(R1,"radius of largest sphere is")
disp(R2,"maximum radius of sphere is")
|
