Datoteka:
  



integer p(10),i,seme
seme=31427
do i=1,10
   p(i)=int(ran(seme)*10)
   enddo
print*,p
end









Avtor: Danilo Klasinc

V kolikor želite sodelovati z nami, vas vljudno vabimo, da se nam pridružite, pošljete članke, ali pa samo izrazite vaša mnenja.