~七國民黨中

日五十月正年午表鷹复

報日僑華

六期星,日十月二(〇九九一)年九十七國民華中(28)

CLASS

1090

INPUT. "SEX

"$$

CLASS NO.

1100

INPUT."TELEPHONE: "; TS

NAME

1110

PAINTE, C$, CNS, N$, SS,T$.

1990中學會考預習專業

Computer (19)

SEX

1120

GOTO 1020

·TELEPHONE'

1130

CLOSE "MEMBER"

1140.

RETURN

MELL & DALE PRESS

K. Choy.

Class

Class no. Name Sex

Sex of the member

Telephone:

Telephone number of the member

V.

File handling problem:

A school computer club wants to use a computer to manage the infurmation on the membership. Information about a member includes the following information:

Class of the students member

Class number of the student member

Name of the member

The disk. file 1/0 commands are defined as follows: 1. Open a sequential file for computer output:

OPENO "file-name"

e.g. OPENO "NEMSER"

ii. open a sequential file for coniputer input:

OPENT "file-Ban

.9. OPENT "MEMBER"

iii. Read in items from un opened sequential-File:

INPUTA. Fem, tem, item.....

e.s. INPUTA, A$, 0, 0

iv. Write items to an opened sequential file:

PRINTA, item, item, item...

e.g. PRINT, OS, F, F

Detecting the end of a file:

(b) [Using line numbers 2000 to 29993 read all records of the file "MEMBER" into the following arrays and determine the total number of members, N.

CN$(1) Class ausber of the Ith member

T$113. = Tephone number of the Ith mpinber

[c}[Using line umbers 3000 tc 39997 input the name of manber by

the user in the format:

PLEASE ENTER THE NAME OF MEMBER TO AF SEARCHED:

The END for: CLASS is used as a rogue value to terminate the inputting process. Open a sequential file "MEMBER" for output to store the information of members on a disk,

{b) 2000

2010

2020

I = 1

2030

2040

RÉM SUBROUTINE TO READ AND-COUNT RECORDS

OPENI "MEMBER"

IF FOF THEN 2070

INPUTA, C$(1), (N$(1), N$, $$. T$,

C$(1)

=

Class of the Ith member

N$CO)

Name of the ith member

$$(1)

= Sex of the Ith member

2050

T = [ & l

2060

GOTO 2030.

2070

N =1-1

2080

CLOSE "MEMBER"

2090

2100

PRINT "THE TOTAL NUMBER OF MEMBERS="; RETURN

(e) 3000.

3010

Assume that all data are stored in arrays as those specified in part (b). Search the data for the nome of member. If the name of member matches, then print the details of member in the following format;

3020

REM SEARCH AND PRIMT MEMBER INFORMATION

INPUT "PLEASE ENTER THE NAME OF MEMBER TO BE SEARCHED:";E$

FOR 1 TO N

3030

IF C$) - ES TIEN 3100

3040

NEXT I

3050

PRINT

3060

THE INFORMATION ABOUT THE MEMBER IS

PRINT "THAT NAME DOES NOT EXIST!"

3070

PRINT "PLEASE TRY AGAIN."

CLASS

3080 PRINT

CLASS NO.

3000

Coro 3010

NAME

3100

PRINT

SEX

3110

PRINT "THE INFORMATION ABOUT THE MEMBER IS"

TELEPHONE

3120

PRINT

E OF

The computer will response with a TRUE or FALSE)

If the name does not exist, then print the message THAT NAME DOES NOT EXIST! PLEASE TRY AGAIN.

3130

PRINT "CLASS

CS:1)

3140

PRINT "CLASS NO.:": CNMD)

3150

PRINT "NAME

NS(1)

3160

PRINT "SEX

vi. Close a sequential file:

and repeat the operation by asking for another name.

3170

PRINT "TELEPHONE: TSU)

3180

RLTURN

淺談現代女性健美

不要隨潮流,再續參加錄莫名

0.0.0

周福華

.。當然級別、學資都有区别,酬全肯定會不同的,但多我白俗我的學歷過敏 ,資歷和水迷都不會比西人杀。而在中國內地也有類似的問題,只界 嬰兒所用的肥皂子 國人珙健算就認爲有水準,在香港有水準的华人也會被排斥

望用最法而不含香料的

精神 及酸饢京將

心中年少青磁紅、

佳課練訓石

儲莞,時繫的詞彙,返在五十年代香港已有健美運動。業時一講到一些悶熱,導致一導熱愛鶇究會,在自學過程中出現了傷害事故,在紅外,還可以為傳藝泡洗 小

·其11人的美錄影帶成為熱愛聽羗運動的攜手商品,但是由推那種,或上肥皂後,年 出&影赞的商人考慮商業效果多,經略了科擊直理教育學原則等方面的,而足夠的清水神族。此中課上)及十一

程學

於三月八 「尼期四风”

日(星期日

PRINT "COMPUTER CLUB MEMBERSHIP (INPUT DATA)"

CLOSE "f11em

e.g. CLOSE "NEMBER"

Assume that all the dimensions of all arrays have been declared in the main program.

Solution:

(a) 1000

1010

REM SHAROUTINE TO WRITE DATA ON FILE OPENO "MEMBER"

krite subroutines in BASIC for each of the following:

1020

(a) [Using line numbers 1000 to 1999 input the information about the member by the user through the keyboard. The data are input ip the failowing format:

1030

1040

1050

INPUT "CLASS :: C$

1060

(F COVEND" THEN 1130

COMPUTER CLUB MEMBERSHIP (INPUT DATA)

1070

(TYPE SND FOR CLASS WHEN FINISH)

1080

INPUT CLASS NO.:"; $ INPUT "NAME :: NE

PRINT (TYPE END FOR CLASS WHEN FINISH)"

PRINT

財團徵求

不交吉樓舖交吉亦可 全幢或大批更佳無需看樓

價合成交 港九均合:

照榮投資公司 3631815(專錢)

九龍馬頭闖道76號

表機售25三中 經營標環

財團高價收購中信投資公司

不交吉樓或交吉樓舖 全糧或一批·大小樓舖 港九均合·無須睇樓 即日成交,免費估價,歡迎查詢

3928102沙龍地產

不交吉樓舖・交吉亦可 全粒或大量更佳 無需香樓

●即日成交 港九均合

財團徵求

線含11633994398

You may also try to do the following updating process by yourself.

(d) [Using line numbers 4000 to 4999) to sort the name of members in

alphabetic order by any sorting method.

(e) Using line numbers 5000 to 59991 to add new members to the

file.

(0) Using line members 6000 to 69993 to change information about

members.. (g) [Cairy line numbers 7000 to 7999]to delete members.

一分永久地出设呂 移民消鷸浪擔好地方古

旺舖吉售| 幼稚園頂讓

46李太:

元朗大棠 補習社誠讓

5635579

人山人海近地铁新裝

補習社頂讓 貴盛工

美容士多藝業中在慈電|CALL設LATE T2A77

分類廣告

大字四個·小字卅四個

每天二十元

各界来稿惠登,每段 本報分慧廣告,著吧

沙田村屋自讓免佣男34端

1163339-9797 214#

荃灣海濱

每日下午五路书氰稿

均計算“長期無君, 多出宇鬟按一條位通 半如超殺一個位- 即 每天收费二十元,利

一法律性廣告、清携

谦身份症 ]

上水急售

出讓

籠雪

幼稚園讓

屯門已註冊經營中楼

送慈興有慈請致函沙田

8.9.96230

|到火車站要親4782329.

日立電視黼上村三樓

台電西上!

不婚39 箱友礎工程

政兩房大街阳保瑚無往盱年0下女友詩雨

KEBEEX7

與陳碩士擒湖程上逃

太古城托兒

|誠徵女友香與服務公司,

[幼兒師

貌美的下場女附照

ON HI 96830 LS.A

20 港九物業

收購鋼琴 些

| 近巴士站点鹰4782265,

950 789057 07662028

旺舖頂讓 土長對地貘頂租平

黃金舖讓

千佰計超好大濂大

作甡九世中央和箱

港友正 信安戰友 電至大學32服34 希附薇

鬆友

四雌歲失女

*衛失左婚38

合成之旅 徵求女友 誠

結識知己船河舞會

液10

兒童大加

7648712(專機)

元朗

廠房

中環寫字樓招租 威靈頓街收購各區樓

病理

面積320 呎及480呎,中央冷氣系統,管理完善 「交通方便,租金相宜。有意請電: 开5231037區先生育

發財旺舖質

成交快 浩棧地產 洽

150號連閣租三萬浩棧地產

5443955

港香

中環結志街24號地下 B 5.44396. 電話 5 3381 傳鐵機8505610

箍樂徵照鄀者

4電感男

13服女 15:

【尖友好正

阻旽無

拜快波不箱歴有同年

報求男伴

3942336 3946522

【移鋰離

73年成立类规模害多優考量能的邁

幸福婚姻有限公司

新年進步

11至八時電3689986傳3665857

沙掘無

女不

莉互啡

3同

慈康哭

45

福翻未男 S有招男中一台53有華同乌照10保 建26261中传文化年稍遲至物!

誠徵女友誠

:貎色誠徵20至25高5.6

至58貌连品融女友先友;另28未婚品说隹有事業

佳偶早成 夜燈养的藥夜28下堂

請由眾疑: 美佳少女先发後的情

幸福婚姻有限公司河內道二五楼,到本薪1288信箱如不語最佳有意衝電阻本報

台則原件退運:

【藝職

6 MER

- EAST ASIA COMPUTER-MARRIAGE ASSOCIATION.

東亞電腦婚姻協進會 (香港政府驻册)

EXPERIENCED CONSULTANTS TO OFFER COMPUTER-AIDED MARCHING

SERVICE, SPECIALISED IN SERVING OVERSEAS AND FOREIGNERS

姓名:專業槿合本港及外埠姻缘

1279倍箱。

知己 婚姻

:德謝T.V. B. 星期一檔案專訪 本署會費及成功個案實例 盤

臨 33200881

註冊:

旅遊介紹

二博覽旅遊

|箱994號

774201

住家自用考試煉習新舊

特徵

!

報食品 共

品口

無誠

址费40元

【嘗誼

熊晚譌1

`附车站331,西直發建鸨皆仕娠襖

美誠徵

信雨端 報失歷。 铃意職淑38 箱包合歲任 琴友有未女 洽请胶液體 语文岽 以瓜便品

128

誠徽女友

照125巷一長線職男

上古經濟先有樓本報·

414 箜接照岜址不覆

250

女然

30文谜

稍微

8921 282

加女伴

誠徵港求證徵徵

荃價要臣下婚

「家獎裕自餘物業誠徵

|老件市50至50歲無子女

男美 失 女 控件

郵沟貌一箱附A

本文倩所里

咖 朋友

日掏訴機男9期五季36 經志友箱 預香們徵大! 不辉男女箱附心欲40

學友

神無

電親訪間推言,撮台灣世界

地址彌敦道580號彌敦中心1902511

L真善美婚姻服務公司 鸟未婚擇偶。烏失婚重建安男性退婚記前只 3-328635′5-3902553兩間公司雞服務

按箭富有3贼波斯嵞大厦1A10-7時星期你急 彌敦道313 號永安盟業大厦1302室: 非為事業、為健康,勸若艾把終身護 形本公司婚姻同業商會會員,進守自律

全港首創覽縊影視錄影助否卻時選擇 全港唯一專業商界高職人士擇偶資料韶

國際電腦婚姻

8921282

「感寂寞求共鳴互關隙良

强求大淑馨系四十六栽 自助餐結識長明证觀光香港斑色限 以下女土路传籍貫方 未婚失婚離婚男女11號星期五晚出装 不拘否说起坦誠共

| 「彌敦道241 號金家人口2字 210 處勿白欺騙人要动生

̇活媒件商洽函本報 香港灣仔駱克道184銀城商厦1403 (佐敦道口屈臣氏樵上)

$73579120 1947信额

義登

1980-054583932 29292 45 ** 免尖人不批區徵中應後註品蜜大發 男

3830212527* 資訊

悲螫合

合安可成客全必成全国

土模女 費條 女料复生

196994)

女母將舊客聯白質寫線 遮跨閱續有一子微不 烟酒货年四十以下高 條件相若男仕無電照不 服判港郵局信箱25306

317

先文品住曲品至教衝以教婿变端年,

·番外榨30番徵二者六不中自然品牌

文好辣女; 税品开该轻代33

2. 再45人以婚至除女良智品物键學尖以基文更以性貌以天薇恩友

的卡卡克 省好梨佳上婚上 * 職生下好下

畢特優甄記是技術與生成功創 細講配裝配例备、高秀選者能、

者费果方的可收及费费。

商品*

治疗自 我: 我外墣異費**揮 *香等前乏

免例止優免付仟發原欠

手帳

徵求女友

物業殼

台灣公司菲律賓、宿關

多場:(一秀姑巒溪(二)台東三港高級四天、五天、六天、七天由2490起

四末㰂動物團五孔雀園 【宿霧五天、七天 由 3350起 | 六九族文化村

多增進:(1)碧桃灣、淸灣、百 (2)紅磨坊夜總會的 (3)餐膳於中國城酒家

限公司,

九義與沙團費藥行1427-1428米

73516617351031

|中區皇后大道中粧晚萬年大厦103密{京豪酒抵標上

5217209 6268305

倘僞灣愅礒中心2101星(松城屋樓上

|旺角彍孵嬢$36號建行中心9034岁小

「布吉島、P.P蘿島、曼谷五天、七天、

*行程種類全港最多* 華歌七岩凍色五、六、七天 溝邐、金三角、曼谷麵、六、七天 「布吉島、曼谷五天、七天

泰星嘉九天$190

本州七天豪華團

$6590

【8307133 清淇、曼谷、仁廳、李欣、布吉島九天

3.3390 #$3290 由$3890起 $3990起 $5050

·馬星(擋城,馬六甲)泰九天$5190 馬泰(布吉島)星七天、八天由$5490起 馬生(競城,馬六甲)六天 $4840、 馬型(檳城,怡保,邦喀島 七天 $5190 馬來亞(擋城,怡保邦喀島)六天$4100 泰星六天 $ 3140

*猻家住宿東京銀座大酒店,方便購物∗ 本州五、六天

:由$5390起 |九州本州油士尼聯进七天、八天 由$7490起 東北日光迪士尼六天、七天 由$6290起 東北、北海道廸士尼七天

$.7190 日本北海道六天、七天

̇由$7190起

3325655

·李灣地鐵站南豐中心21宽4920248

4150806

多馨波:(1)蕸露人工海潤型 (2)攜盤式

$7190

豬國九州八天

韓國道陽四天、五天

$7390

台北花蓮高雄六天$3660 環島阿里山八天$4500

*早機去、晚機返

内$3880起

「實地體諛站當嬌法癟了接137及142室 7973023

布吉島往崔满晚成三晚任君選擇 *布吉惠安排新行程PP藳島*

秉搭國泰、秦航、天天出發(可延期这港!

18.500km H

行程種類最多、成本最高 韓國本州廸士尼八天

台北四天 .$2820 最慈阿里山六天 $3660| 台北花蓮四天 $2820. 瓖島阿里山七天$40801

*純粹旅行團,不是帶貨團

乘國泰、粛航、華航、早去晚返 逢一、二、三、四、五、六出發「天天出發,回程可停東京大阪或台北天天出發(回程可停留台北)专建收150元

台灣、斯里辦卡·馬爾代夫

澳紉、印度

紐西蘭(南北島) 八天探索團 $12,090 粗澳七、九、十、十三天 豪華風

$9,190

大堡礁、黃金海岸、需製 七、九天豪華團 $12,990起|

歐洲

美、加

州、東京、迪士尼七天

$4,890

名古屋、東京、廸士尼五天

豪園

韓國、濟州四、五天 賽華團

($4,490 譚國、本州、廸士尼八天 豪華團:

台灣四天渡假團 12,890 台灣環島六天 高級菌

古國西、葡、慈十三天 探索團

$14.000

$3,690 -台灣環島阿里山七、八天

高级菌 力 $4,090c

歐洲十三天 精選團

$11,900

·東南歐十五天 豪華團

#13,100起

$8,000

韓國、九州九天 ̇豪華齡

斯里蘭卡八天 豪華遊

雙城八天

$4,780

̇購物團。

$8,990

38,390

|鹿兒島·九州、迪士尼

七、八天豪華團7.490起

東京、韓國、九州九天 豪華團

斯里蘭卡、馬爾代夫八天 豪華遊

|歐洲十天

精選團

$9,790

$5,890

$8,790

歐洲十二天

JAL

波假四

*11,490

溫哥華五、六天地產 投資考察團 $8,800 加拿大多倫多五、六天 豪華遊

£9,000€ 美加西東岸七八九、 十天豪華團 $9,690起 美加西東岸十一、十二、 十三天豪華團 $16,200 夏威夷、美加西東岸六九、 十一天豪華遊 $8,790起 夏威夷美加西岸十三、 十五天豪華遊 $17,899起

$11,390

JAL

印度八天豪華團 $7,880

BRITISH AIRWAY

JAL W

北海道豪華觀

光国 ®

$5,390

7,590

·鹿兒島、九州五、七、八天

榮華 $5,400起

紐西蘭八天移民 考察團

$13,000 澳洲七天地產投資:

̇考審團

(4)獨家安排品嚐

中式火鍋 馬尼拉住六之巴拉,發瑶佳

乘搭國泰、早機去、晚機返 天天出發,可延期退灕:

星晨旅遊

利是後遺症

杜詠恩

一追求,其中過程「十,畫上, 面的女孩成篇好友,又吃的哀號, 被一名搅間的「四眼仔 的花菜,真是美不勝收 小西點薏笑,郑小黑猫 的西餅麵包,退賽林士 一分美味,令人垂裾览上,

巫父與森林中,性格爽,前面是一排石板路

容包

Share This Page