k = fclose(fd) Integer k; Integer fd;
if ((fd1 = fopen("afo", "w")) < 0) { error("Can't open %s", "afo"); } fprintf(fd1, "%d %f %s", 10, 3.1415, "Hello"); fclose(fd1); if ((fd2 = fopen("afo", "r")) < 0) { error("Can't open %s", "afo"); } {a, b, c} = fscanf(fd2, "%d %lf %s"); fclose(fd2);