1268/CH11/EX11.9/a_9.sce


1
2
3
4
5
6

clc;
disp("Example A.9")
dratio=10
uratio=1/dratio
fratio=uratio*uratio*dratio*dratio
disp(fratio,"The ratio of model force to prototype force is ")