永远把艰辛的付出看作是生命的必要; 即使没有收获的指望,也心平气静地继续耕种!

97/100 C Programs(文件名加存盘)

上一篇 / 下一篇  2008-04-01 00:22:24 / 个人分类:C  

/*【程序97】
h"aZOK+~%ET:h0题目:从键盘输入一些字符,逐个把它们送到磁盘上去,直到输入一个#为止。
kx3`] W~z(V01.程序分析:     
%M utjk4Fr02.程序源代码:*/LUPA开源社区4d&gguX V6R1b
#include "stdio.h"LUPA开源社区*A6yp1[RPLF
main()
6H!Anp#p#w4p0{
bwGy3Ad6\ v0    FILE *fp;LUPA开源社区P?.Fs9c&q2G*@ d ag
    char ch, filename[10];
hq J(m:AF0    scanf("%s", filename);
)Su8Tb*oLn|VM h @$I;r0    if((fp=fopen(filename, "w"))==NULL)
cTp)X:bgp0]A;z OUl6[0    {LUPA开源社区!]u8[E9z x6r6Y&[5L!`
        printf("cannot open file\n");
4CA!HwB;I8h9]0        exit(0);
w5do6~^!VT6P0    }LUPA开源社区r3E PyE7~'_/T{
    //回车、换行LUPA开源社区K{!P;M^&w
    ch = getchar();LUPA开源社区0Et!B-i Ng6C
    ch = getchar();LUPA开源社区1y/?4f"kZ5c+z1L
    while(ch!='#')
z${~C7I5HWZ] mJ0    {LUPA开源社区8I1d8T8A)yqR:N7M}
        fputc(ch,fp);putchar(ch);LUPA开源社区 O7}r!}q
        ch = getchar();
pJF9b8K.s0    }
^IQ(C,h0    fclose(fp);
DoY-cQy0}

TAG:

 

评分:0

我来说两句

显示全部

:loveliness: :handshake :victory: :funk: :time: :kiss: :call: :hug: :lol :'( :Q :L ;P :$ :P :o :@ :D :( :)

日历

« 2008-10-12  
   1234
567891011
12131415161718
19202122232425
262728293031 

数据统计

  • 访问量: 2239
  • 日志数: 43
  • 图片数: 1
  • 文件数: 4
  • 建立时间: 2007-11-07
  • 更新时间: 2008-08-11

RSS订阅

Open Toolbar