Oscillazione smorzata

Oscillazione smorzata

omeg=1.
gamma=omeg/2.
do i=1,100
t=0.1*i
x=sin(omeg*t)*exp(-gamma*t)
write(10,*)t,x
end do