计算机算法语言
- 格式：pdf
- 大小：2.73 MB
- 文档页数：6
【 NTEGER※ ⒆
,l卜
DoI=2,N
END Do RETURN
EbID
12、
写出下面程序的结果_____— °
program cx
打 np⒒ c⒒ none
虹eger,pointeF∶ ∶ ) ⒒ a(∶
intege△ target∷ b(0)=√ 1,2,3,4,5o
a◇ b wr恫 (带 ,衤 )a
DoI=4,2,4
A=1,o DOJ=I,4,2
A=A+1。 o
‘乡⒎ 冫
END Do END Do
WRIt1B(扌
,衤
)A
BblD 运行上述程序后 ,输 出的 A值 为
D
A)5,O B)4.O C)3.O D)2.o ⒛ ,可 调数组~中 出现 。
B)只 能在子程序 ⑷ 只能在主程序 Q只 能在主程序和子程序 D)可 以在主程序、子程序和模块
:
F(0》 =0
F(1)=1
当 d玎 ~时
2、
~=_
F◇DFF【n~l,+F◇ ⒈ z)
(8分 )设 计一个子程序 ,计 算一个任意矩阵 A的 最大元素和最小元素 。 n)(如 3、 (10分 )对 任意 自然数 n,设 计 一 个求 n的 各位数字 的立 方和 的函数子程序 又 艹 (当 一个数各 叉121)1++s十穸 3+1料 3=1十 8H=1o,并 调用 Ftn,求 1000以 内的所有水仙花数 个数位的立方和等于这个数本身时 ,称 这样的数为水仙花数 )。
10FORMATC1X,3⒓
)
END
程序运行 缭构是 ~。
喵
彳圹 〖 )
:)3
6
9
c)4
5
6
D)7
8
9
,【P巴J?卩 ty芊 -夕 ∫ ・ˉ 乡 L
谳器;1坶
V
Γ
'' 矽
10FORMATtlX,F4.D
EblD
程序运行结果是___。 0 ∶ 1.C Q2,0 B》 ⑶ △。
D,3,0
:
少
19,阋 读下列 FORⅡ 认N程 序
↑ 举
,
对 CHo⑺ ,下 齑 法 确 蕞 则于 说止的
A)它 是一个数组片段 BJ它 是一个数组定义形式 CH的 一个子串,并 且长度是 4 D)它 是 CH的 一个子串,并 且长度是 s o它 是
戊 掼 繇
数组共有_个
抖唧 〔 卵
元素。
z∶
V忐 黑 簇 禽 恙 鸾
: ∧
・ 举祗 ⒆ 箔 靶 鞠 叩 ・ 。 巍瑙镦趑 辍 忌 鼍Ξ客 的元 晷唇鳟曩素 帚晷 组 芗雩雪 序数
AJ伊
s=s+1/K
骂黪螨若 程 干序 革 掣
帅獭 贿 珊
∷
END Do
WRITE(艹 ,→ s EblD
执行上述程序后,输 出的 s碹 为 .___。
A,0,75 B)1.75
C)0.0 D)1,o
&⒘
;li寻 :l∶
骨∶ ∶ 丨
Ii∶
13。
DATA W1,2,3,4,5,6,7,8,9/
wRITE(尔 ,10)mc3,o,卜 1,3)
integ0rr
m灬 、 co1)
|
0ρ l=2
=
血teger c
data巛m(△ c),F△ ,2),c=1,2y1,2,3,4/
…
tC【
+,`B,I3,/,I3,I3)D((m◇
1Θ ,c丬 ,2),F1,刀
stop
8、
下 列 程 序 的运 行 显 示 瘩 果 是
DIMENsION X(3,3)
1NTEGER,pARAˇ ETER∷ N=5
′ DⅡEGER A〈 〉),I,T
(】 I∶
DATAAy8,6,5,4,1/
(衤 WRI1刀 巳 ,10)m(I),H,o
DOI=1,N/z
/dtL冫
ˉ END Do WRI冗 t+,1ω (A(I),卜 1,匀 ˉ
′(btl}
/dˉ
10FORMATf1X,5⒕ )
EblD
J薷
4、
F阳 ⒎ ” “ Do卜 3,15`” 共计完成 已知 I是 整型变量 ,当 Do结 构从 正常出 口 结束时 ,语 句 “
苡 辨
Ⅰ
mteger a,b
reaI ra,rb
结 黢
|与
a=2
b≡ 3
ra=2,o
Fb=3.0
w抵(+,+)b/a
writeC,D rb/r泛 辶
6、
FOF刂 □ N R0⒋
A,符 号赏量的定义应该放在所有语旬之前
⑶ 符号常量不可以是字符型常量
o在 一个程序单位中定义一个符号常量后 ,不 能再改变它的值
D,符 号常量定义语句与赋值语句一样 ,是 可执行语句 ∫ 5,在 下列写法 中,___不 是 FORΠuN常 量。 〗 A) .tR况 ,B)1Eˉ 2 C)(0.0,2,4) D)1,000,000
程 中梳 湘 o乩 表 钏 序 帅 示
甜 厂|ρ 千 T串/a/V`扌 吊豇锡 窃 川 悬 厶 n咖 幕 L 矽
FFF的 T|某 — ∶窟 罕 息 ∴ ∴ 勇Ι 帚 「 ∶
i。
血 p1iot m仉
∷
ro、 〓 integer,parameter∶ ∶ 旷 2
mteger,parameter∷
h饴 ger∶ ∶
DOl、T==1,10
5
T=ss艹 3.45
END Do
2、
PROGRAM ex
IMPLICIT NONE IN1EGER∷ n
CIIARACTERGEN=o∷
READ(+,+)n
aˉ
b i nkd li冫
a,b,c
〈】
|厂
G-sqftCa+圪 +b艹 咔 ㈥
wnte(十 ,+)c
四、编程题
1、
(8分 )编 写一个程序来计算前 10个 费氏数列 ,并 把它们按顺序保存在 一个一维数组当 中,费 氏数列的数列规则是
癍铺糕为鼾 掮尻 巯 甏 戍 黑 ,拒 赢 黼 式 赢 ⊥。 |错 廴 宀 重 式 ~_。 冖 恝 。 体ζ 篙罗 I:y⒁ 岬 趑 是 l擘 〖 嚣 钰 扩 ・ DB.l骼 搌:变 量描翥 窆 。 类 翮 A)隐
含约定 (I-N规 则 )、
丿 卜∶
:景 ;亨 i∶
:∶
大 蛳 童 ∶ ∶
5⑵
:∶:∶
ENDБайду номын сангаас
IO、
1
下列程序完成按以下格式打印杨辉三角形的前 N行
:
1
1
1
2 1
1331 14641
请在横线处填写适当语句 ,使 程序完鑫 。
pARAMETERrN-1o)
INTEGER A(N,η ,I,J DoI=1,N
Aσ ,1)1
END Do
DOI=3,N
pOJ=2,⒈ 1
^∫
C岛 END Do END Do
9
~队
=F'・
24
10
26
一 宀 、选择鹛 (每 小题 2分 ,共 碉 分 ) 1,下 列标识符中不能 作为 FORTRAN的 合法变量名的是 。 ι ˉ 丿 基 。莳 毛 R铖 变 薹 奥 鲨 裒 轹 疲 音 ?H。 G A,REAL语 句 B)CHAR语 旬 C)INmGER语 旬 D)LOGICAL语 句 o 3.FORTRAN9o源 程 序 的扩 展 名 是 ____。 A)TXT B) F C)F90 D) FOR 4,下 列关于符号常量的说法正确 的是___占
DATAXy1,2,3,4,5,6,7,8,9/
二 丨 田 s,〃 乡
s=o DoI=1,3
s=s+XCI,4oI)
END Do
WRITEC艹 ,20)s
20FORMAT(1X,’
s=;,F6.2)
END
9、
下列程序将 一个数 组的元素逆序重新存放 ,例 如存放顺序为 :8,6,5,4,1。 要求改为 :1,4,5,6,8。 请在横线处填写适 当语旬 ,便 程序 完整 。
DoI=1,N
(了 JLi丿 冫 十用 ^|,丁 ).
WRITE(扌 ,10XA【 I,J,,J=1,I,
END Do
10FORMAT(1X,10I5)
EblD
11、
下列子程序 的作用是返回数组 A中 的最小值 。请在横线处填写适当语旬 ,使 程序完整 。
′ r,NIlN
st1BPtOUTIblE PROCMrNfA,N,MN,
a=|≥
>b(13)
η te《 中 咀 ,+)a
a=>b(1∶ 5∶ 2)
艹 wr⒒ 《 ,+,a
a=》 b(5∶ 1∶ ˉ 1)
v氵 ohe(扌 ,紫 )a
stop
end
三、下面是程序中的一段代码 ,请 指出其错误(每 题 5分 ,共 10分 )。
1、
,¨
¨¨¨¨¨¨¨・
E=① 扌 T+23)
IFG)=500)GoTo5
中山大学工学院二O-ˉ 学年第二学期期末考试试题 (A卷 )
课 程:计 算机算法语言 氵 学 号:~巴 “ ” 辶
评卷人 (签 名 ) 姓 名
:
廴 廴 锊
月 日上
成绩评定 考试时间:zOIz年
” 《 中山大学授子学士学位工作细则》第六条 :“ 考试作舁不授予学士学位 。
题次 分数
得分
四
,l卜
DoI=2,N
END Do RETURN
EbID
12、
写出下面程序的结果_____— °
program cx
打 np⒒ c⒒ none
虹eger,pointeF∶ ∶ ) ⒒ a(∶
intege△ target∷ b(0)=√ 1,2,3,4,5o
a◇ b wr恫 (带 ,衤 )a
DoI=4,2,4
A=1,o DOJ=I,4,2
A=A+1。 o
‘乡⒎ 冫
END Do END Do
WRIt1B(扌
,衤
)A
BblD 运行上述程序后 ,输 出的 A值 为
D
A)5,O B)4.O C)3.O D)2.o ⒛ ,可 调数组~中 出现 。
B)只 能在子程序 ⑷ 只能在主程序 Q只 能在主程序和子程序 D)可 以在主程序、子程序和模块
:
F(0》 =0
F(1)=1
当 d玎 ~时
2、
~=_
F◇DFF【n~l,+F◇ ⒈ z)
(8分 )设 计一个子程序 ,计 算一个任意矩阵 A的 最大元素和最小元素 。 n)(如 3、 (10分 )对 任意 自然数 n,设 计 一 个求 n的 各位数字 的立 方和 的函数子程序 又 艹 (当 一个数各 叉121)1++s十穸 3+1料 3=1十 8H=1o,并 调用 Ftn,求 1000以 内的所有水仙花数 个数位的立方和等于这个数本身时 ,称 这样的数为水仙花数 )。
10FORMATC1X,3⒓
)
END
程序运行 缭构是 ~。
喵
彳圹 〖 )
:)3
6
9
c)4
5
6
D)7
8
9
,【P巴J?卩 ty芊 -夕 ∫ ・ˉ 乡 L
谳器;1坶
V
Γ
'' 矽
10FORMATtlX,F4.D
EblD
程序运行结果是___。 0 ∶ 1.C Q2,0 B》 ⑶ △。
D,3,0
:
少
19,阋 读下列 FORⅡ 认N程 序
↑ 举
,
对 CHo⑺ ,下 齑 法 确 蕞 则于 说止的
A)它 是一个数组片段 BJ它 是一个数组定义形式 CH的 一个子串,并 且长度是 4 D)它 是 CH的 一个子串,并 且长度是 s o它 是
戊 掼 繇
数组共有_个
抖唧 〔 卵
元素。
z∶
V忐 黑 簇 禽 恙 鸾
: ∧
・ 举祗 ⒆ 箔 靶 鞠 叩 ・ 。 巍瑙镦趑 辍 忌 鼍Ξ客 的元 晷唇鳟曩素 帚晷 组 芗雩雪 序数
AJ伊
s=s+1/K
骂黪螨若 程 干序 革 掣
帅獭 贿 珊
∷
END Do
WRITE(艹 ,→ s EblD
执行上述程序后,输 出的 s碹 为 .___。
A,0,75 B)1.75
C)0.0 D)1,o
&⒘
;li寻 :l∶
骨∶ ∶ 丨
Ii∶
13。
DATA W1,2,3,4,5,6,7,8,9/
wRITE(尔 ,10)mc3,o,卜 1,3)
integ0rr
m灬 、 co1)
|
0ρ l=2
=
血teger c
data巛m(△ c),F△ ,2),c=1,2y1,2,3,4/
…
tC【
+,`B,I3,/,I3,I3)D((m◇
1Θ ,c丬 ,2),F1,刀
stop
8、
下 列 程 序 的运 行 显 示 瘩 果 是
DIMENsION X(3,3)
1NTEGER,pARAˇ ETER∷ N=5
′ DⅡEGER A〈 〉),I,T
(】 I∶
DATAAy8,6,5,4,1/
(衤 WRI1刀 巳 ,10)m(I),H,o
DOI=1,N/z
/dtL冫
ˉ END Do WRI冗 t+,1ω (A(I),卜 1,匀 ˉ
′(btl}
/dˉ
10FORMATf1X,5⒕ )
EblD
J薷
4、
F阳 ⒎ ” “ Do卜 3,15`” 共计完成 已知 I是 整型变量 ,当 Do结 构从 正常出 口 结束时 ,语 句 “
苡 辨
Ⅰ
mteger a,b
reaI ra,rb
结 黢
|与
a=2
b≡ 3
ra=2,o
Fb=3.0
w抵(+,+)b/a
writeC,D rb/r泛 辶
6、
FOF刂 □ N R0⒋
A,符 号赏量的定义应该放在所有语旬之前
⑶ 符号常量不可以是字符型常量
o在 一个程序单位中定义一个符号常量后 ,不 能再改变它的值
D,符 号常量定义语句与赋值语句一样 ,是 可执行语句 ∫ 5,在 下列写法 中,___不 是 FORΠuN常 量。 〗 A) .tR况 ,B)1Eˉ 2 C)(0.0,2,4) D)1,000,000
程 中梳 湘 o乩 表 钏 序 帅 示
甜 厂|ρ 千 T串/a/V`扌 吊豇锡 窃 川 悬 厶 n咖 幕 L 矽
FFF的 T|某 — ∶窟 罕 息 ∴ ∴ 勇Ι 帚 「 ∶
i。
血 p1iot m仉
∷
ro、 〓 integer,parameter∶ ∶ 旷 2
mteger,parameter∷
h饴 ger∶ ∶
DOl、T==1,10
5
T=ss艹 3.45
END Do
2、
PROGRAM ex
IMPLICIT NONE IN1EGER∷ n
CIIARACTERGEN=o∷
READ(+,+)n
aˉ
b i nkd li冫
a,b,c
〈】
|厂
G-sqftCa+圪 +b艹 咔 ㈥
wnte(十 ,+)c
四、编程题
1、
(8分 )编 写一个程序来计算前 10个 费氏数列 ,并 把它们按顺序保存在 一个一维数组当 中,费 氏数列的数列规则是
癍铺糕为鼾 掮尻 巯 甏 戍 黑 ,拒 赢 黼 式 赢 ⊥。 |错 廴 宀 重 式 ~_。 冖 恝 。 体ζ 篙罗 I:y⒁ 岬 趑 是 l擘 〖 嚣 钰 扩 ・ DB.l骼 搌:变 量描翥 窆 。 类 翮 A)隐
含约定 (I-N规 则 )、
丿 卜∶
:景 ;亨 i∶
:∶
大 蛳 童 ∶ ∶
5⑵
:∶:∶
ENDБайду номын сангаас
IO、
1
下列程序完成按以下格式打印杨辉三角形的前 N行
:
1
1
1
2 1
1331 14641
请在横线处填写适当语句 ,使 程序完鑫 。
pARAMETERrN-1o)
INTEGER A(N,η ,I,J DoI=1,N
Aσ ,1)1
END Do
DOI=3,N
pOJ=2,⒈ 1
^∫
C岛 END Do END Do
9
~队
=F'・
24
10
26
一 宀 、选择鹛 (每 小题 2分 ,共 碉 分 ) 1,下 列标识符中不能 作为 FORTRAN的 合法变量名的是 。 ι ˉ 丿 基 。莳 毛 R铖 变 薹 奥 鲨 裒 轹 疲 音 ?H。 G A,REAL语 句 B)CHAR语 旬 C)INmGER语 旬 D)LOGICAL语 句 o 3.FORTRAN9o源 程 序 的扩 展 名 是 ____。 A)TXT B) F C)F90 D) FOR 4,下 列关于符号常量的说法正确 的是___占
DATAXy1,2,3,4,5,6,7,8,9/
二 丨 田 s,〃 乡
s=o DoI=1,3
s=s+XCI,4oI)
END Do
WRITEC艹 ,20)s
20FORMAT(1X,’
s=;,F6.2)
END
9、
下列程序将 一个数 组的元素逆序重新存放 ,例 如存放顺序为 :8,6,5,4,1。 要求改为 :1,4,5,6,8。 请在横线处填写适 当语旬 ,便 程序 完整 。
DoI=1,N
(了 JLi丿 冫 十用 ^|,丁 ).
WRITE(扌 ,10XA【 I,J,,J=1,I,
END Do
10FORMAT(1X,10I5)
EblD
11、
下列子程序 的作用是返回数组 A中 的最小值 。请在横线处填写适当语旬 ,使 程序完整 。
′ r,NIlN
st1BPtOUTIblE PROCMrNfA,N,MN,
a=|≥
>b(13)
η te《 中 咀 ,+)a
a=>b(1∶ 5∶ 2)
艹 wr⒒ 《 ,+,a
a=》 b(5∶ 1∶ ˉ 1)
v氵 ohe(扌 ,紫 )a
stop
end
三、下面是程序中的一段代码 ,请 指出其错误(每 题 5分 ,共 10分 )。
1、
,¨
¨¨¨¨¨¨¨・
E=① 扌 T+23)
IFG)=500)GoTo5
中山大学工学院二O-ˉ 学年第二学期期末考试试题 (A卷 )
课 程:计 算机算法语言 氵 学 号:~巴 “ ” 辶
评卷人 (签 名 ) 姓 名
:
廴 廴 锊
月 日上
成绩评定 考试时间:zOIz年
” 《 中山大学授子学士学位工作细则》第六条 :“ 考试作舁不授予学士学位 。
题次 分数
得分
四
