[流程圖]

試題6

在 COMET 型計(jì)算機(jī)上可以使用試卷上所附的 CASL 匯編語言。閱讀下列程序說明和 CASL 程序，把應(yīng)填入其中__n__處的字句，寫在答卷的對(duì)應(yīng)欄內(nèi)。

[程序說明]

本程序根據(jù)輸入的姓名(字符串)，在已有的線性表中查找其相應(yīng)的通信地址(字符串)，并予以輸出。

標(biāo)號(hào)為DATPTR的存貯字存放著線性表第一個(gè)結(jié)點(diǎn)的地址。結(jié)點(diǎn)的數(shù)據(jù)結(jié)構(gòu)定義如下：

最后一個(gè)結(jié)點(diǎn)的指針字段為空指針( 內(nèi)容為 0 )。

[程序]

試題7

閱讀下列程序說明和 C 程序，把應(yīng)填入其中__n__ 處的字句，寫在答卷的對(duì)應(yīng)欄內(nèi)。

[程序說明]

(1)本程序利用輾轉(zhuǎn)相除法求兩個(gè)均不超過100次的多項(xiàng)式A，B的最大公因式。

例： A(x)=x3一x2+x一1＝(x2+1)(x一1)

B(x)＝x5一7x4十7x3-3x2+6x+4＝(x2+1) (x3-7x2十6x+4)

最大公因式為x2+1。

(2)輾轉(zhuǎn)相除法的算法如下：

用其中的一個(gè)多項(xiàng)式去除另一個(gè)多項(xiàng)式；然后，將所得余式變成除式，原除式變成被除式。如此反復(fù)相除，當(dāng)余式為。時(shí)，當(dāng)前除式即為最大公因式。

[程序]

#include <stdio.h>

#include <math.h>

#define DECISE.0005

#define MAX_POWER 100

main( )

{ int i，a，b；

float Ca[MAX_POWER+1]，Cb[MAX _POWER+1]；

void Remainder()；

scanf("％d"，&a)；

for ( i＝0；i<＝a；i++ )

scanf( "％f"，&Ca[i] )；

scanf( "％d"，&b) ；

for ( i＝0；i<＝b；i++ )

scanf( "％d"，&Cb[i] )；

Remainder(Ca，Cb，a，b)；

}

void Remainder(Pointer A，Pointer B，a，b)

float *Pointer A，*Pointer B；

int a，b；

{ float x，y，*Temp；

int i，j，F(xiàn)1ag=1；

while ( Flag )

{ i＝0；

while ( PointerB[i]＝＝0 )

{ i ++；b一-；

__①__ ；

}

x＝Pointer[i]；

while ( i<＝b )

PointerB[i++]／＝x；

for ( i＝0；i<＝a-b；i++ )

{ __②__ ；

for(j＝0；j<b ； j++) 

{ y = PointerA[i+l+j]一x * PointerB[j+1]；

PointerA[ __③__ ]＝

( y<DECISE&&-y<DECISE )?0.0；y；

}

}

Temp＝Pointer A；

PointerA＝PointerB； ·

PointerB = __④__ ；

a=b--；

for ( Flag＝0，i＝0；i<b && Flag＝＝0；i++ )

if ( PointerB[i] !=0.0 ) Flag＝1；

}

printf( "The Greatest Common Factor is：＼n")；

for ( i＝0；i<a；i++ )

if ( PointerA[i]!= 0.0)

printf( "％5．3f *x ∧％d％s"，

PointerA[I]，a-i，( PointerA[i+1]<0.0 ) ?""："+" )；

printf( "％5．3f＼n"，PointerA[a] )；

}

試題8～10 略（COBOL、FORTRAN、PASCAL）