经典c程序100例91100Word下载.docx
- 文档编号:20289999
- 上传时间:2023-01-21
- 格式:DOCX
- 页数:9
- 大小:17.34KB
经典c程序100例91100Word下载.docx
《经典c程序100例91100Word下载.docx》由会员分享,可在线阅读,更多相关《经典c程序100例91100Word下载.docx(9页珍藏版)》请在冰豆网上搜索。
end=time(NULL);
printf("
\1:
Thedifferentis%6.3f\n"
difftime(end,start));
【程序93】
时间函数举例3
{clock_tstart,end;
doublevar;
start=clock();
10000;
end=clock();
(double)(end-start));
【程序94】
时间函数举例4,一个猜数游戏,判断一个人反应快慢。
(版主初学时编的)
stdlib.h"
{charc;
clock_tstart,end;
time_ta,b;
inti,guess;
srand(time(NULL));
doyouwanttoplayit.('
y'
or'
n'
)\n"
loop:
while((c=getchar())=='
)
{
i=rand()%100;
\npleaseinputnumberyouguess:
\n"
a=time(NULL);
scanf("
%d"
&
guess);
while(guess!
=i)
{if(guess>
i)
{printf("
pleaseinputalittlesmaller.\n"
else
pleaseinputalittlebigger.\n"
b=time(NULL);
Ittookyou%6.3fseconds\n"
var=(double)(end-start)/18.2);
ittookyou%6.3fseconds\n\n"
difftime(b,a));
if(var<
15)
\1\1Youareveryclever!
\1\1\n\n"
elseif(var<
25)
\1\1youarenormal!
\1\1youarestupid!
\1\1Congradulations\1\1\n\n"
Thenumberyouguessis%d"
i);
\ndoyouwanttotryitagain?
(\"
yy\"
.or.\"
n\"
)\n"
if((c=getch())=='
gotoloop;
【程序95】
家庭财务管理小程序
/*moneymanagementsystem*/
dos.h"
FILE*fp;
structdated;
floatsum,chm=0.0;
intlen,i,j=0;
intc;
charch[4]="
"
ch1[16]="
chtime[12]="
chshop[16],chmoney[8];
pp:
clrscr();
sum=0.0;
gotoxy(1,1);
|---------------------------------------------------------------------------|"
gotoxy(1,2);
|moneymanagementsystem(C1.0)2000.03|"
gotoxy(1,3);
gotoxy(1,4);
|--moneyrecords--|--todaycostlist--|"
gotoxy(1,5);
|------------------------|-------------------------------------|"
gotoxy(1,6);
|date:
--------------||"
gotoxy(1,7);
|||||"
gotoxy(1,8);
|--------------||"
gotoxy(1,9);
|thgs:
------------------||"
gotoxy(1,10);
gotoxy(1,11);
|------------------||"
gotoxy(1,12);
|cost:
----------||"
gotoxy(1,13);
gotoxy(1,14);
|----------||"
gotoxy(1,15);
|||"
gotoxy(1,16);
gotoxy(1,17);
gotoxy(1,18);
gotoxy(1,19);
gotoxy(1,20);
gotoxy(1,21);
gotoxy(1,22);
gotoxy(1,23);
i=0;
getdate(&
d);
sprintf(chtime,"
%4d.%02d.%02d"
d.da_year,d.da_mon,d.da_day);
for(;
;
gotoxy(3,24);
Tab__browsecostlistEsc__quit"
gotoxy(13,10);
"
gotoxy(13,13);
gotoxy(13,7);
%s"
chtime);
j=18;
ch[0]=getch();
if(ch[0]==27)
break;
strcpy(chshop,"
strcpy(chmoney,"
if(ch[0]==9)
mm:
fp=fopen("
home.dat"
"
r+"
gotoxy(6,4);
listrecords"
|-------------------------------------|"
gotoxy(41,4);
gotoxy(41,5);
|"
while(fscanf(fp,"
%10s%14s%f\n"
chtime,chshop,&
chm)!
=EOF)
{if(i==36)
{getch();
if((i%36)<
17)
{gotoxy(4,6+i);
gotoxy(4,6+i);
if((i%36)>
16)
{gotoxy(41,4+i-17);
gotoxy(42,4+i-17);
i++;
sum=sum+chm;
%10s%-14s%6.1f\n"
chtime,chshop,chm);
gotoxy(1,24);
||"
gotoxy(1,25);
gotoxy(10,24);
totalis%8.1f$"
sum);
fclose(fp);
gotoxy(49,24);
pressanykeyto....."
getch();
gotopp;
while(ch[0]!
='
\r'
{if(j<
10)
{strncat(chtime,ch,1);
j++;
if(ch[0]==8)
len=strlen(chtime)-1;
if(j>
{len=len+1;
j=11;
strcpy(ch1,"
j=j-2;
strncat(ch1,chtime,len);
strcpy(chtime,"
strncat(chtime,ch1,len-1);
gotomm;
exit
(1);
j=0;
{if(j<
14)
{strncat(chshop,ch,1);
{len=strlen(chshop)-1;
strncat(ch1,chshop,len);
strncat(chshop,ch1,len-1);
chshop);
6)
{strncat(chmoney,ch,1);
{len=strlen(chmoney)-1;
strncat(ch1,chmoney,len);
strncat(chmoney,ch1,len-1);
chmoney);
if((strlen(chshop)==0)||(strlen(chmoney)==0))
continue;
if((fp=fopen("
a+"
))!
=NULL);
fprintf(fp,"
%10s%14s%6s"
chtime,chshop,chmoney);
fputc('
\n'
fp);
gotoxy(41,5+i);
%10s%-14s%-6s"
}}}
【程序96】
计算字符串中子串出现的次数
string.h"
{charstr1[20],str2[20],*p1,*p2;
intsum=0;
pleaseinputtwostrings\n"
%s%s"
str1,str2);
p1=str1;
p2=str2;
while(*p1!
\0'
if(*p1==*p2)
{while(*p1==*p2&
&
*p2!
{p1++;
p2++;
p1++;
if(*p2=='
sum++;
}
【程序97】
从键盘输入一些字符,逐个把它们送到磁盘上去,直到输入一个#为止。
{FILE*fp;
charch,filename[10];
filename);
if((fp=fopen(filename,"
w"
))==NULL)
cannotopenfile\n"
exit(0);
ch=getchar();
while(ch!
#'
{fputc(ch,fp);
putchar(ch);
【程序98】
从键盘输入一个字符串,将小写字母全部转换成大写字母,然后输出到一个磁盘文件“test”中保存。
输入的字符串以!
结束。
{FILE*fp;
charstr[100],filename[10];
inti=0;
test"
cannotopenthefile\n"
pleaseinputastring:
gets(str);
while(str[i]!
!
'
{if(str[i]>
a'
str[i]<
z'
str[i]=str[i]-32;
fputc(str[i],fp);
r"
fgets(str,strlen(str)+1,fp);
%s\n"
str);
【程序99】
有两个磁盘文件A和B,各存放一行字母,要求把这两个文件中的信息合并(按字母顺序排列),
输出到一个新文件C中。
inti,j,n,ni;
charc[160],t,ch;
A"
fileAcannotbeopened\n"
\nAcontentsare:
(ch=fgetc(fp))!
=EOF;
{c[i]=ch;
putchar(c[i]);
ni=i;
B"
fileBcannotbeopened\n"
\nBcontentsare:
n=i;
n;
for(j=i+1;
j<
j++)
if(c[i]>
c[j])
{t=c[i];
c[i]=c[j];
c[j]=t;
\nCfileis:
C"
{putc(c[i],fp);
【程序100】
有五个学生,每个学生有3门课的成绩,从键盘输入以上数据(包括学生号,姓名,三门课成绩),计算出
平均成绩,况原有的数据和计算出的平均分数存放在磁盘文件"
stud"
中。
structstudent
{charnum[6];
charname[8];
intscore[3];
floatavr;
}stu[5];
{inti,j,sum;
/*input*/
5;
\npleaseinputNo.%dscore:
stuNo:
stu[i].num);
name:
stu[i].name);
sum=0;
for(j=0;
3;
score%d."
j+1);
stu[i].score[j]);
sum+=stu[i].score[j];
stu[i].avr=sum/3.0;
if(fwrite(&
stu[i],sizeof(structstudent),1,fp)!
=1)
filewriteerror\n"
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 经典 程序 100 91100