summaryrefslogtreecommitdiff
path: root/1430/CH1/EX1.1/exa1_1.sce
blob: 0af113a66f3b948dc05724be377192c9455675e8 (plain)
1
2
3
4
5
6
7
8
9
10
// Example 1.1
// charge Transfer and Average Current
function[i]=f(t)
    i=10*sin(%pi*t/2)
endfunction            // Current as a function of time
q_T=intg(0,6,f);      // Total charge is given by integrating area under the curve of                     // current vs time
i_av=q_T/6;
disp(q_T,"total charge Transfer is(in coulombs) =")
disp(i_av,"Average current is (in Amps)=")