（15）填空

以下程序从名为 filea.dat 的文本文件中逐个读入字符并显示在屏幕上。请填空：

#include ＜stdio.h＞

main()

{ FILE *fp; char ch;

fp=fopen(【 15 】 );

ch=fgetc(fp);

whlie(!feof(fp)) { putchar(ch); ch=fgetc(fp);}

putchar('\n'); fclose(fp);

}

#include ＜stdio.h＞

long 【 14 】 ; /* 函数说明语句 */

main()

{ long n;

n=func(); printf("n=%ld\n",n);

}

long func()

{ long m;

for(m=0;getchar()!='@'; 【 15 】 );

return m;

}

以下程序的功能是输出如下形式的方阵：

13 14 15 16

9 10 11 12

5 6 7 8

1 2 3 4

请填空。

main()

{ int i，i，x；

for(j=4； j______； j--)

{ for(i=1； i＜4； i++)

{ x=(j-1)*4+______；

printf("%4d"，x)；

}

printf("\n")；

}

以下程序的功能是输出如下形式的方阵：

13 14 15 16

9 10 11 12

5 6 7 8

1 2 3 4

请填空。

include ＜stdio.h＞

main()

{ int i,j,x;

for(j =4;j 【 】;j--)

{ for(i = 1 ;i＜=4;i++)

[ x=(j-1) *4+【 】;

printf("%4d" ,x);

}

printf(" \n" );

}

以下程序的功能是：求出数组 x 中各相邻两个元素的和依次存放到 a 数组中，然后输出。请填空。

main()

{ int x[10],a[9], i ;

for (i=0;i＜10;i++)scanf("%d",&x[i]);

for(【 14 】 ;i＜10;i++)

a[i-1]=x[i]+ 【 15 】 ;

for(i=0;i＜9;i++) printf("%d",a[i]);

printf("\n");

}

Private Sub Command1_Click()

Dim inData As String

Text1.Text = ""

Open "d:\myfile.txt" For 【 14 】 As #1

Do While 【 15 】

Input #1, inData

Text1.Text = Text1.Text + inData

Loop

Close #1

End Sub

程序的功能是，打开 D 盘根目录下的文本文件 myfile.txt ，读取它的全部内容并显示在文本框中 。 请填空。

阅读下面的保险单，并根据提出的问题填空：

(1)保险公司名称：

(2)发票号码：

(3)保险单编号：

(4)投保人名称：

(5)唛头：

(6)包装及数量：

(7)保险货物名称：

(8)保险金额(小写)：

(9)保险金额(大写)：

(10)运输工具：

(11)开航日期：

(12)起运地(港)：

(13)目的地(港)：

(14)承保险别：

(15)赔款地点：

(16)投保日期：