#7
by Math » 5年前
Windows10、CX-Buider (bcc32c エンバカデロC相当として使用)
の場合
プログラム
main.c
コード:
#include <stdio.h>
#include <stdlib.h>
int main(){
char * name[5];
int i;
FILE * fp;
if((fp=fopen("05write_person.txt","w"))==NULL){
return 1;
}
for(i=0; i<5; i++){
printf("%d番目の人名を入力してください;", i+1);
name[i] = (char *) malloc(sizeof(char) * 10);
scanf("%s", name[i]);
}
for(i=0; i<5; i++){
fprintf(fp, "%s\n", name[i]);
}
fclose(fp);
//for(int i=0;i<5;i++)free(name[i]); //今回はプログラム終了するため不要です
printf("\n入力した名前をファイルに入力しました。 \n");
}
実行結果
コード:
C:\19\19c\bcc32c>"C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\bcc32c" main.c
Embarcadero C++ 7.40 for Win32 Copyright (c) 2012-2018 Embarcadero Technologies, Inc.
main.c:
Turbo Incremental Link 6.90 Copyright (c) 1997-2017 Embarcadero Technologies, Inc.
C:\19\19c\bcc32c>dir main.exe
ドライブ C のボリューム ラベルがありません。
ボリューム シリアル番号は 7813-6100 です
C:\19\19c\bcc32c のディレクトリ
2019/07/04 05:25 89,088 main.exe
1 個のファイル 89,088 バイト
0 個のディレクトリ 94,287,560,704 バイトの空き領域
C:\19\19c\bcc32c>main.exe
1番目の人名を入力してください;aaa
2番目の人名を入力してください;bbb
3番目の人名を入力してください;ccc
4番目の人名を入力してください;ddd
5番目の人名を入力してください;eee
入力した名前をファイルに入力しました。
C:\19\19c\bcc32c>pause
続行するには何かキーを押してください . . .
05write_person.txt
バッチファイル cx.bat
コード:
"C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\bcc32c" main.c
dir main.exe
main.exe
pause
Windows10、CX-Buider (bcc32c エンバカデロC相当として使用)
の場合
プログラム
main.c
[code]
#include <stdio.h>
#include <stdlib.h>
int main(){
char * name[5];
int i;
FILE * fp;
if((fp=fopen("05write_person.txt","w"))==NULL){
return 1;
}
for(i=0; i<5; i++){
printf("%d番目の人名を入力してください;", i+1);
name[i] = (char *) malloc(sizeof(char) * 10);
scanf("%s", name[i]);
}
for(i=0; i<5; i++){
fprintf(fp, "%s\n", name[i]);
}
fclose(fp);
//for(int i=0;i<5;i++)free(name[i]); //今回はプログラム終了するため不要です
printf("\n入力した名前をファイルに入力しました。 \n");
}
[/code]
実行結果
[code]
C:\19\19c\bcc32c>"C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\bcc32c" main.c
Embarcadero C++ 7.40 for Win32 Copyright (c) 2012-2018 Embarcadero Technologies, Inc.
main.c:
Turbo Incremental Link 6.90 Copyright (c) 1997-2017 Embarcadero Technologies, Inc.
C:\19\19c\bcc32c>dir main.exe
ドライブ C のボリューム ラベルがありません。
ボリューム シリアル番号は 7813-6100 です
C:\19\19c\bcc32c のディレクトリ
2019/07/04 05:25 89,088 main.exe
1 個のファイル 89,088 バイト
0 個のディレクトリ 94,287,560,704 バイトの空き領域
C:\19\19c\bcc32c>main.exe
1番目の人名を入力してください;aaa
2番目の人名を入力してください;bbb
3番目の人名を入力してください;ccc
4番目の人名を入力してください;ddd
5番目の人名を入力してください;eee
入力した名前をファイルに入力しました。
C:\19\19c\bcc32c>pause
続行するには何かキーを押してください . . .[/code]
05write_person.txt
[code]
aaa
bbb
ccc
ddd
eee[/code]
バッチファイル cx.bat
[code]
"C:\Program Files (x86)\Embarcadero\Studio\20.0\bin\bcc32c" main.c
dir main.exe
main.exe
pause
[/code]