program deljenje2 real a,b print*,'vnesi dve stevili' read*,a,b do while(b.eq.0) print*,'imenovalec = 0' read*,b enddo print*,'kolicnik =',a/b end