//cption:Find value of current
//Ex8.5
clc
clear
close
V=10//voltage across resistor(in V)
R=1000//resistance(in ohm)
i=V/R
disp(i,'value of current(in A)=')