1319/CH12/EX12.2/i_2.sce


1
2
3
4
5
6
7
8
9
10
11
12

// Compute Average lighting current
clc;
clear;

q=20;
t=(10)*(10^-3);

// Coulomb's Law

I=q/t;

disp('amperes',I,'The Average Lightning current =')