fscanf(fp,"%d",&data[k])
とします。これで該当するファイルよりデータを入力します。次に入力したデータを表示します。Memo1->Lines->Add(IntToStr(data[k]))
これでMemo1にデータを表示します。ほかに言葉なども表示したい場合はMemo1->Lines->Add("データ["+IntToStr(k)+"]の値は"+IntToStr(data[k])+"です")
と+を使って表示します。またMemo上をクリアにしたい場合は、Memo1->Lines->Claer()
によりクリアにします。