Portál AbcLinuxu, 12. května 2025 07:41
program cti integer, parameter :: dimension = 100 character(len=1) :: pole(100) open(1,file='binarnisoubor',form='unformated') read(1) pole close(1) end program
Tiskni
Sdílej:
ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.