reformat data file

china_forrest

小弟有一个文本格式如下：

1      -32      34     12        23     -445     212     32     23          4
2       32      2       23     -445      212       32     23       2     -234
. . .
. . .

然后我想写一个c 或者fortran程序把这些数字按照下面的格式输出：
1      
-32
34     
12        
23     
-445     
212     
32     
23         
4
2      
32      
2      
23     
-445     
212      
32     
23      
2     
-234
.
.
.
我自己写了一个fortran，但是一运行就出错，不知道用c怎么写，哪位朋友帮帮忙，谢谢！ 我自己的fortran程序如下：

Program transform
implicit none
integer :: A
dimension :: A(10)
integer :: I
open(4,file="old.dat",status="unknown"
do I=1,10
read(4,100) A(I),A(I+1),A(I+2),A(I+3),A(I+4),A(I+5),A(I+6),A(I+7),A(I+,A(I+9)
end do
100 format(I7,I7,I7,I7,I7,I7,I7,I7,I7,I7)
open(5,file="new.dat",status="unknown"
do I=1,10
write (5,200) A(I)
end do
200 format(I7)
close(4)
close(5)
end

flag

参考一下下面的代码

1. 
   
2. #include <stdio.h>;
   
3. int main()
   
4. {
   
5.         FILE *fp=fopen("test.txt","r");/*test.txt里是你的数据，我看到似乎是十个一组的*/
   
6.         if(fp!=NULL)
   
7.         {
   
8.                 char buff[256];
   
9.                 int data[10];
   
10.                 int m=0;
    
11.                 while(fgets(buff,256,fp)>;0)
    
12.                 {
    
13.                        
    
14.                         char end[4];
    
15.                         char *p=strtok(buff," ");
    
16.                         while((p!=NULL)&&(m<10))
    
17.                         {
    
18.                                 data[m++]=atoi(p);
    
19.                                 p=strtok(p+strlen(p)+1);
    
20.                         }
    
21.                         while(m-->;0)
    
22.                         printf("data[%d]=%d\n",m,data[m]);
    
23.                 }
    
24.                
    
25.                 fclose(fp);
    
26.         }
    
27. }
    

复制代码

flag

上面的输出是倒着的，省事了一点，望见谅。