summaryrefslogtreecommitdiff
path: root/2243/CH8/EX8.13/Ex8_13.sce
blob: 6102a1c126739bf64814455bbf88c0c0419c5ed7 (plain)
1
2
3
4
5
6
7
clc();
clear;
//Given :
RBE = 0.7 ; //RBE factor for cobalt 60 gamma rays
dose = 1000 ; // dose in rad
e = RBE*dose; // equivalent dose in rem 
printf("Equivalent dose is %d  rem",e);