diff options
Diffstat (limited to '3769/CH20/EX20.8/Ex20_8.sce')
-rw-r--r-- | 3769/CH20/EX20.8/Ex20_8.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3769/CH20/EX20.8/Ex20_8.sce b/3769/CH20/EX20.8/Ex20_8.sce new file mode 100644 index 000000000..b49e25960 --- /dev/null +++ b/3769/CH20/EX20.8/Ex20_8.sce @@ -0,0 +1,14 @@ +clear +//Given +ra=60 +rb=45.0 +a=40.0 + +//Calculation +ia1=(ra**2)/(rb**2) +ia=(ra**2)/(a**2) +i=ia-ia1 +A=(i*100)/ia + +//Result +printf("\n percentage of light is absorbed by the glass is %0.0f percentage",A) |