diff options
Diffstat (limited to '1415/CH1/EX1.2.3/ex3.sce')
| -rw-r--r-- | 1415/CH1/EX1.2.3/ex3.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/1415/CH1/EX1.2.3/ex3.sce b/1415/CH1/EX1.2.3/ex3.sce new file mode 100644 index 000000000..81c171e8e --- /dev/null +++ b/1415/CH1/EX1.2.3/ex3.sce @@ -0,0 +1,27 @@ +//Example 3 Page no 60
+clc
+clear
+//creating function
+function q=f(p)
+ q=77.8*p^(-0.11)
+endfunction
+
+disp('a)')
+//plotting demand function
+disp('the demand curve is as in the graph')
+p=([200 400 500 800 1200 1600 2000 2200])
+y=f(p)
+plot(2400,50,p,y,'blue')//plotting graph
+
+disp('b)')
+//the demand at tuition costs of $1000 and $1500
+disp('the demand at tuition costs of $1000 and $1500')
+q=f(1000)//funcition calling
+mprintf("\t%f thousand students\n",q)
+q=f(1500)//funcition calling
+mprintf("\t%f thousand students\n",q)
+//the change in demand is therefore given as
+disp('the change in demand is therefore given as')
+change=(f(1500)-f(1000))//funcition calling
+mprintf("\t%f thousand students\n",change)
+xtitle('Technology formula','p','q');
|