clip378 : 16000000の謎
Created Mon Nov 22 15:42:09 2010
Last Modified Mon Nov 22 15:42:09 2010
program float
real a
integer b
a = 0
b = 1000000
do i=1,18000000
if(b <= i) then
b = b + 100000
write(*,*) i, a
endif
a = a + 1e-6
enddo
end
*
Cited From:
clip378 : 16000000の謎
real a
integer b
a = 0
b = 1000000
do i=1,18000000
if(b <= i) then
b = b + 100000
write(*,*) i, a
endif
a = a + 1e-6
enddo
end