| ²é¿´: 2761 | »Ø¸´: 0 | ||
3sGirlгæ (СÓÐÃûÆø)
|
[ÇóÖú]
IDLÖжÁ*.prvÎļþ³öÏֵĴíÎó£ºREADF: End of file encountered. Unit: 101,
|
|
¸÷λ´óÏÀ£º ÄúÃǺã¡ ÓÃIDL¶Á*.prv Îļþ£¬³öÏֵĴíÎó£ºREADF: End of file encountered. Unit: 101, File: G:¡°book.txt¡± ´úÂëÈçÏ£ºif file_test(txtname)then begin;The FILE_TEST function checks files for existence and other attributes without having to first open the file/ÓÃÀ´¼ì²éÎļþÊÇ·ñ´æÔÚ¼°ÔÚ²»´ò¿ªÎļþµÄÇé¿öϼì²éÆäÊôÐÔ nLines=file_lines(txtname);file_lines()ÓÃÓÚ·µ»ØÊý¾ÝµÄÐÐ tmp=" ";¶¨ÒåÒ»¸ö×Ö·û´®±äÁ¿ openr,lun,txtname,/get_lun ; ´ò¿ªÎļþ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; while(~EOF(lun))do begin; readf,lun,tmp;¶ÁÈ¡µÚÒ»ÐÐ ; print,tmp ; help,tmp Col=strsplit(tmp,/extract);²ð·ÖµÚÒ»ÐлñÈ¡ÁÐÊý ColNum=N_elements(Col) Arr_1=dblarr(ColNum,nLines-1);¶¨ÒåÒ»¸önÁÐn-1ÐУ¬ÔªËØÎª0µÄÊý×é ;point_lun,lun,2 readf,lun, Arr_1 ;READF requires a file unit to be explicitly specified---Ã÷È·Ö¸¶¨Îļþµ¥Ôª Arr_1=[[Col],[ Arr_1]];ÖØÐÂ×éºÏÊý×é(n£¬n-1)+µÚÒ»ÐÐ=£¨n,n£© endwhile print, Arr_1[*,1:*] free_lun,lun ;; Close the file and free the file unit endif ¼ÌÐøÄúµÄÖ¸µ¼£¬Ð»Ð»£¡ |
» ²ÂÄãϲ»¶
¹ØÓÚ»áÆÀ
ÒѾÓÐ1È˻ظ´
¾Ý˵£¡³öÏÖÕâЩÇé¿ö£¬¹ú»ù½ð»áÆÀ±¾×ӻᱻÄÃÏ£¡
ÒѾÓÐ19È˻ظ´
µØÇò»¯Ñ§ÂÛÎÄÈóÉ«/·ÒëÔõôÊÕ·Ñ?
ÒѾÓÐ232È˻ظ´
ÎÞÈË´òÀÌ£¬Ö±½ÓÅãÅÜ
ÒѾÓÐ16È˻ظ´
¶¨Á˶¨ÁË£¬Ã÷Ìì³ö½á¹û£¡2025 ¹ú×ÔÈ»»ù½ð½á¹û¼´½«½ÒÏþ£¬²éѯ¹¥ÂÔ¿´ÕâÀï
ÒѾÓÐ107È˻ظ´
2025¹ú¼Ò×ÔÈ»¿ÆÑ§»ù½ð·Å°ñʱ¼ä£¬¸ù¾Ý¹Ù·½»ØÓ¦£¬8ÔÂ15ÈÕ»ù±¾Ã»Ï·ÁË
ÒѾÓÐ5È˻ظ´
¸÷λδÀ´ÔºÊ¿°ïæ¿´¿´ÆÀÉóÒâ¼û
ÒѾÓÐ9È˻ظ´
¡¶·ç´µ¹ýÈÕ³£µÄ·ì϶¡·
ÒѾÓÐ0È˻ظ´
³ÏÑû
ÒѾÓÐ0È˻ظ´














»Ø¸´´ËÂ¥
100