コード:

#include <stdio.h>   // fopen, fclose, fgets, fscanf, fprintf
#include <string.h>  // strstr
 
#define N 3000

double a[N][3];

int main(void)
{
    int i, n = 0;
    double d[3];
    char buf[1024];
    FILE *fin, *fout;
    fin = fopen("in1.txt", "r");
    if (!fin) return 1;
    while (fgets(buf, sizeof buf, fin) && !strstr(buf, "VISIBLE")) ;
    while (n < N && fscanf(fin, "%lf%lf%lf", &a[n][0], &a[n][1], &a[n][2]) == 3) n++;
    fclose(fin);

    fin = fopen("in2.txt", "r");
    if (!fin) return 2;
    fout = fopen("out.txt", "w");
    if (!fout) return 3;
    while (fgets(buf, sizeof buf, fin) && !strstr(buf, "VISIBLE")) ;
    while (fscanf(fin, "%lf%lf%lf", &d[0], &d[1], &d[2]) == 3) {
        for (i = 0; i < n && (d[0]!=a[i][0] || d[1]!=a[i][1] || d[2]!=a[i][2]); i++) ;
        if (i < n) fprintf(fout, "%f %f %f\n", d[0], d[1], d[2]);
    }
    fclose(fin);
    fclose(fout);

    return 0;
}

コード:

//座標データの最初の1文字まで、添え字を進める
for(;isdigit(in1[in1_adr]) == 0 && in1[in1_adr] != '\0';in1_adr++);

コード:

#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>

//ファイルサイズの取得
long get_data_size(char *path){
	FILE *fp;
	int i;
	
	if((fp=fopen(path,"r")) == NULL) return 0;
	for(i=1;(fgetc(fp)) != EOF;i++);
	fclose(fp);
	
	return i;
}

//ファイルの読み込み
char* load_data(char *path){
	char *data,c;
	int i;
	FILE *fp;
	
	data=(char*)malloc(sizeof(char)*get_data_size(path));
	if(data == NULL) return NULL;
	if((fp=fopen(path,"r")) == NULL) return NULL;
	for(i=0;(c=fgetc(fp)) != EOF;i++) data[i]=c;
	data[i]='\0';
	fclose(fp);
	
	return data;
}

//出力ファイルの初期化
int init_file(void){
	FILE *wfp;
	int i;
	
	wfp=fopen("out.txt","w+");
	for(i=0;""[i] != '\0';i++) fputc(""[i],wfp);
	fclose(wfp);
	
	return 0;
}

//出力ファイルに追記
int add_data(char *str){
	FILE *wfp;
	int i;
	
	wfp=fopen("out.txt","a+");
	for(i=0;str[i] != '\0';i++) fputc(str[i],wfp);
	fclose(wfp);
	
	return 0;
}

int main(void){
	char *in1,*in2;
	char key_word[1024];
	
	int in1_adr,i;
	
	//メモリにファイルのデータをロード(点の数が多くなった場合、ファイルを直に読むと遅くなる可能性があるため。)
	in1=load_data("in1.txt");
	if(in1==NULL) return 1;
	
	in2=load_data("in2.txt");
	if(in2==NULL){
		free(in1);
		return 1;
	}
	
	//'A'は座標データの直近の行にしか無いので、そこまで、カウンタを進め、
	for(in1_adr=0;in1[in1_adr] != 'A';in1_adr++);
	
	//ここで、改行コードまで読み進める(次のデータから、座標データの始まり)
	for(;in1[in1_adr] != '\n' && in1[in1_adr] != '\0';in1_adr++);
	
	//出力ファイルの初期化
	init_file();
	
	for(;1;){
		//座標データの最初の1文字まで、添え字を進める
		for(;isdigit(in1[in1_adr]) == 0 && in1[in1_adr] != '\0';in1_adr++);
		if(in1[in1_adr] == '\0') break;
		
		//座標データ1つを抜き出す
		for(i=0;isdigit(in1[in1_adr]) == 1 || in1[in1_adr] == '.' || in1[in1_adr] == ' ' || in1[in1_adr] == '-' || in1[in1_adr] == '+';in1_adr++,i++) key_word[i]=in1[in1_adr];
		key_word[i]='\0';
		
		//in1の座標がin2に存在した場合、
		if(strstr(in2,key_word) != NULL){
			//その座標の文字列を、出力用ファイルに追記する。
			add_data(key_word);
			add_data("\n");
		}
	}
	
	return 0;
}