编程马拉松(5)(6)

freesoft

引自第八阁论坛：http://bbs.chinadbg.cn/forum-7-1.html
飞翔技术论坛：http://www.powk.net/bbs/forumdisplay.php?fid=4&page=1
输入某年某月某日，判断这一天是这一年的第几天？程序设计时要利用　 switch   case 　语句主要目的就认识和使用分支结构。
要注意一点，闰年的二月份。
天圆地方的Delphi

1. 
   
2. procedure TForm1.Button1Click(Sender: TObject);
   
3. var
   
4.   MonthNum,DayNum:integer;
   
5. begin
   
6.   DayNum:=0;
   
7. Case MonthOf(now())-1 of
   
8.    1:DayNum:=31;
   
9.    3:DayNum:=31*2;
   
10.    4:DayNum:=31*2+30;
    
11.    5:DayNum:=31*3+30;
    
12.    6:DayNum:=31*3+30*2;
    
13.    7:DayNum:=31*4+30*2;
    
14.    8:DayNum:=31*5+30*2;
    
15.    9:DayNum:=31*5+30*3;
    
16.    10:DayNum:=31*6+30*3;
    
17.    11:DayNum:=31*7+30*3;
    
18.    12:DayNum:=31*7+30*4;
    
19. end;
    
20. if ((YearOf(now())mod 4)=0)and (MonthOf(now())=2) then DayNum:=DayNum+29
    
21. else DayNum:=DayNum+28;
    
22. DayNum:=DayNum+DayOf(now());
    
23. ShowMessage(IntToStr(DayNum));
    
24. end;
    

复制代码

真要实现这个功能的话，可用如下：

1. 
   
2. procedure TForm1.Button2Click(Sender: TObject);
   
3. begin
   
4. showmessage(inttostr(dayoftheyear(now())));
   
5. end;
   

复制代码

freesoft,C代码：注意，闰年且输入月份大于3时需考虑多加一天。

1. 
   
2. #include "stdio.h"
   
3. #include "conio.h"
   
4. main()
   
5. {
   
6.   int day,month,year,sum,leap;
   
7.   printf("\nplease input year,month,day\n");
   
8.   scanf("%d,%d,%d",&year,&month,&day);
   
9.   switch(month) /*先计算某月以前月份的总天数*/
   
10.   {
    
11.     case 1:sum=0;break;
    
12.     case 2:sum=31;break;
    
13.     case 3:sum=59;break;
    
14.     case 4:sum=90;break;
    
15.     case 5:sum=120;break;
    
16.     case 6:sum=151;break;
    
17.     case 7:sum=181;break;
    
18.     case 8:sum=212;break;
    
19.     case 9:sum=243;break;
    
20.     case 10:sum=273;break;
    
21.     case 11:sum=304;break;
    
22.     case 12:sum=334;break;
    
23.     default:printf("data error");break;
    
24.   }
    
25.   sum=sum+day; /*再加上某天的天数*/
    
26.   if(year%400==0||(year%4==0&&year%100!=0)) /*判断是不是闰年*/
    
27.     leap=1;
    
28.   else
    
29.     leap=0;
    
30.   if(leap==1&&month>2) /*如果是闰年且月份大于2,总天数应该加一天*/
    
31.     sum++;
    
32.   printf("It is the %dth day.",sum);
    
33.   getch();
    
34. }

复制代码

kill203,我的第三个C++程序

1. 
   
2. #include <iOStream>
   
3. using namespace std;
   
4. main()
   
5. {
   
6.   int day,month,year,sum,leap;
   
7.   cout<<"please input year,month,day \n"<<endl;
   
8.   cin>>year;
   
9.   cin>>month;
   
10.   cin>>day;
    
11.   switch(month) //先计算某月以前月份的总天数
    
12.   {
    
13.     case 1:sum=0;break;
    
14.     case 2:sum=31;break;
    
15.     case 3:sum=59;break;
    
16.     case 4:sum=90;break;
    
17.     case 5:sum=120;break;
    
18.     case 6:sum=151;break;
    
19.     case 7:sum=181;break;
    
20.     case 8:sum=212;break;
    
21.     case 9:sum=243;break;
    
22.     case 10:sum=273;break;
    
23.     case 11:sum=304;break;
    
24.     case 12:sum=334;break;
    
25.     default:printf("data error");break;
    
26.   }
    
27.   sum=sum+day; //再加上某天的天数
    
28.   if(year%400==0||(year%4==0&&year%100!=0)) //判断是不是闰年
    
29.     leap=1;
    
30.   else
    
31.     leap=0;
    
32.   if(leap==1&&month>2) //如果是闰年且月份大于2,总天数应该加一天
    
33.     sum++;
    
34.   cout<<"It is the"<<sum<<"th day."<<endl;
    
35. }
    

复制代码

在些总结一下以前的知识
今天是周未，有此以不方便来，所以我今天只做前4贴的一些总结，以前4贴主要是用实例告诉大家一些基础的东西。我只做C的总结，因为我只会这个。
比如用到的：
数据类型的定义：　int 整形,　float 单精度或叫实型　,char　字符弄

运算符：
1.算术运算符
用于各类数值运算。包括加(+)、减(-)、乘(*)、除(/)、求余(或称模运算，%)、自增(++)、自减(--)共七种。
2.关系运算符
用于比较运算。包括大于(>)、小于(<)、等于(==)、 大于等于(>=)、小于等于(<=)和不等于(!=)六种。
3.逻辑运算符
用于逻辑运算。包括与(&&)、或(||)、非(!)三种。

条件判断：　if（A＞B）{A++}。。 else{B++} 意思是　如果A>B就A加1－－－否则B1

循环：for 主要用在知道循环次数的循环中,whil与do 。。。while 主要用在不知道循环次数，通过程序运行结果来判断是否终止循环。

数组：数组的定义　int A[10] ，注意一点其实字符串是按数组处理的。

字符串的基本操作：
字符串处理函数， 大致可分为字符串的输入、输出、合并、修改、比较、转换、复制、搜索几类。 使用这些函数可大大减轻编程的负担。用于输入输出的字符串函数， 在使用前应包含头文件"stdio.h" ； 使用其它字符串函数则应包含头文件"string.h"。 下面介绍几个最常用的字符串函数。

　　1.字符串输出函数 puts 格式： puts (字符数组名) 功能：把字符数组中的字符串输出到显示器。 即在屏幕上显示该字符串

1. 
   
2. #include"stdio.h"
   
3. main()
   
4. {
   
5. static char c[]="BASIC\ndBASE";
   
6. puts(c);
   
7. }
   
8. static char c[]="BASIC\ndBASE";
   
9. puts(c);
   

复制代码

　　从程序中可以看出puts函数中可以使用转义字符， 因此输出结果成为两行。puts函数完全可以由printf函数取代。 当需要按一定格式输出时，通常使用printf函数。

　　2.字符串输入函数gets 格式： gets (字符数组名) 功能：从标准输入设备键盘上输入一个字符串。 本函数得到一个函数值，即为该字符数组的首地址。

1. 
   
2. #include"stdio.h"
   
3. main()
   
4. {
   
5. char st[15];
   
6. printf("input string:\n");
   
7. gets(st);
   
8. puts(st);
   
9. }
   

复制代码

　　可以看出当输入的字符串中含有空格时，输出仍为全部字符串。说明gets函数并不以空格作为字符串输入结束的标志， 而只以回车作为输入结束。这是与scanf函数不同的。

　　3.字符串连接函数strcat 格式： strcat (字符数组名1，字符数组名2) 功能：把字符数组2中的字符串连接到字符数组1 中字符串的后面，并删去字符串1后的串标志“\0”。本函数返回值是字符数组1的首地址。

1. 
   
2. #include"string.h"
   
3. main()
   
4. {
   
5. 　static char st1[30]="My name is ";
   
6. 　int st2[10];
   
7. 　printf("input your name:\n");
   
8. 　gets(st2);
   
9. 　strcat(st1,st2);
   
10. 　puts(st1);
    
11. }
    
12. static char st1[30]="My name is ";
    
13. int st2[10];
    
14. printf("input your name:\n");
    
15. gets(st2);
    
16. strcat(st1,st2);  
    

复制代码

　　本程序把初始化赋值的字符数组与动态赋值的字符串连接起来。 要注意的是，字符数组1应定义足够的长度，否则不能全部装入被连接的字符串

　　4.字符串拷贝函数strcpy 格式： strcpy (字符数组名1，字符数组名2) 功能：把字符数组2中的字符串拷贝到字符数组1中。串结束标志“\0”也一同拷贝。字符数名2， 也可以是一个字符串常量。这时相当于把一个字符串赋予一个字符数组。

1. 
   
2. 
   
3. #include"string.h"
   
4. main()
   
5. {
   
6. 　static char st1[15],st2[]="C Language";
   
7. 　strcpy(st1,st2);
   
8. 　puts(st1);printf("\n");
   
9. }
   
10. static char st1[15],st2[]="C Language";
    
11. strcpy(st1,st2);
    
12. 
    

复制代码

　　本函数要求字符数组1应有足够的长度，否则不能全部装入所拷贝的字符串。

　　5.字符串比较函数strcmp 格式： strcmp(字符数组名1，字符数组名2) 功能：按照ASCII码顺序比较两个数组中的字符串，并由函数返回值返回比较结果。

　　字符串1＝字符串2，返回值＝0；
　　字符串2〉字符串2，返回值〉0；
　　字符串1〈字符串2，返回值〈0。
　　本函数也可用于比较两个字符串常量，或比较数组和字符串常量。

1. 
   
2. 
   
3. 
   
4. #include"string.h"
   
5. main()
   
6. {
   
7. 　int k;
   
8. 　static char st1[15],st2[]="C Language";
   
9. 　printf("input a string:\n");
   
10. 　gets(st1);
    
11. 　k=strcmp(st1,st2);
    
12. 　if(k==0) printf("st1=st2\n");
    
13. 　if(k>0) printf("st1>st2\n");
    
14. 　if(k<0) printf("st1<st2\n");
    
15. }
    
16. {
    
17. 　int k;
    
18. 　static char st1[15],st2[]="C Language";
    
19. 　printf("input a string:\n");
    
20. 　gets(st1);
    
21. 　k=strcmp(st1,st2);
    
22. 　if(k==0) printf("st1=st2\n");
    
23. 　if(k>0) printf("st1>st2\n");
    
24. 　if(k<0) printf("st1<st2\n");
    
25. }
    

复制代码

　　本程序中把输入的字符串和数组st2中的串比较，比较结果返回到k中，根据k值再输出结果提示串。当输入为dbase时，由ASCII 码可知“dBASE”大于“C Language”故k〉0,输出结果“st1>st2”。

　　6.测字符串长度函数strlen 格式： strlen(字符数组名) 功能：测字符串的实际长度(不含字符串结束标志‘\0’) 并作为函数返回值。

1. 
   
2. 
   
3. 
   
4. #include"string.h"
   
5. main()
   
6. {
   
7. 　int k;
   
8. 　static char st[]="C language";
   
9. 　k=strlen(st);
   
10. 　printf("The lenth of the string is %d\n",k);
    
11. }
    

复制代码

我们还用到了一些函数：
scanf： 从基本输入设备键盘读入数据
printf: 从基本输入设备显示器输出数据
floor：取整
getch:　暂停在DOS窗口


飞翔技术论坛"tzlaoliu"
Delphi提供了现成的函数了

1. 
   
2. Edit2.Text:=IntToStr(DayOfTheYear(StrToDate(Edit1.Text)));
   
3. ShowMessage('今天是今年的第'+IntToStr(DayOfTheYear(StrToDate(Edit1.Text)))+'天');
   
4. 函数核心原型部分
   
5. 
   
6. 
   
7. <!--StartFragment-->function DecodeDateFully(const DateTime: TDateTime; var Year, Month, Day, DOW: Word): Boolean;
   
8. const
   
9.   D1 = 365;
   
10.   D4 = D1 * 4 + 1;
    
11.   D100 = D4 * 25 - 1;
    
12.   D400 = D100 * 4 + 1;
    
13. var
    
14.   Y, M, D, I: Word;
    
15.   T: Integer;
    
16.   DayTable: PDayTable;
    
17. begin
    
18.   T := DateTimeToTimeStamp(DateTime).Date;
    
19.   if T <= 0 then
    
20.   begin
    
21.     Year := 0;
    
22.     Month := 0;
    
23.     Day := 0;
    
24.     DOW := 0;
    
25.     Result := False;
    
26.   end else
    
27.   begin
    
28.     DOW := T mod 7 + 1;
    
29.     Dec(T);
    
30.     Y := 1;
    
31.     while T >= D400 do
    
32.     begin
    
33.       Dec(T, D400);
    
34.       Inc(Y, 400);
    
35.     end;
    
36.     DivMod(T, D100, I, D);
    
37.     if I = 4 then
    
38.     begin
    
39.       Dec(I);
    
40.       Inc(D, D100);
    
41.     end;
    
42.     Inc(Y, I * 100);
    
43.     DivMod(D, D4, I, D);
    
44.     Inc(Y, I * 4);
    
45.     DivMod(D, D1, I, D);
    
46.     if I = 4 then
    
47.     begin
    
48.       Dec(I);
    
49.       Inc(D, D1);
    
50.     end;
    
51.     Inc(Y, I);
    
52.     Result := IsLeapYear(Y);
    
53.     DayTable := @MonthDays[Result];
    
54.     M := 1;
    
55.     while True do
    
56.     begin
    
57.       I := DayTable^[M];
    
58.       if D < I then Break;
    
59.       Dec(D, I);
    
60.       Inc(M);
    
61.     end;
    
62.     Year := Y;
    
63.     Month := M;
    
64.     Day := D + 1;
    
65.   end;
    
66. end;
    

复制代码

21st[P.Y.G]
虽然题目让用switch,我还是用我自己的方式处理。没有作输入检查，基本思想是时空转换。
language: c

1. 
   
2. #include<stdio.h>
   
3. 
   
4. int main()
   
5. {
   
6.     int tb[12]={31,28,31,30,31,30,31,31,30,31,30,31};
   
7.     int year,month,day;
   
8.     scanf("%d,%d,%d",&year,&month,&day);
   
9.     int i,total=0;
   
10.     total+=!(year%4)&&month>2?1:0;
    
11.     for(i=month-2;i>=0;i--)
    
12.     {
    
13.         total+=tb[i];
    
14.     }
    
15.     total+=day;      
    
16.     printf("%d\n",total);
    
17.     return 0;
    
18. }   

复制代码