R语言写简单程序 已知一个文本中有小数和整数，去除其中的整数(保留含有小数点的数字)

#include <stdio.h>

#include <string.h>

int main()

{

    char s[100]

    FILE *fp1, *fp2

    fp1 = fopen("in.txt", "r")

    fp2 = fopen("out.txt", "w")

    if(fp1 == NULL || fp2 == NULL) return -1

    while(~fscanf(fp1, "%s", s))

        if(strchr(s, '.')) fprintf(fp2, "%s ", s)

    fcloseall()

    

    rename("in.txt", "out.txt")

    return 0

}

编程步骤:

人工完成零件加工的数控工艺

分析零件图纸

制定工艺决策

确定加工路线

选择工艺参数

计算刀位轨迹坐标数据

编写数控加工程序单

验证程序

手工编程

---