以歌者之名流浪　　　　　　　　　　　　　　　　　　　　　　　　　<embed src="http://www.clocklink.com/clocks/0031-black.swf?TimeZone=CCT&" width="65" height="65" wmode="transparent" type="application/x-shockwave-flash">

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/*大數四維運算，以char陣列存數字 需string.h */
#define LEN 550 /*設定處理最大位數*/
/*INPUT:將數字存入某陣列*/
/*
輸入：存放目標陣列名 輸出：0代表成功 -1代表失敗
1.清空目標陣列=0 
2.接收輸入放入暫存陣列，失敗則傳回-1
3.計算數字位數(strlen)
4.從個位開始依序放入目標陣列，內容從字元轉成數字
  若個位為1 ,n[0]為1(不是1的ASCII)
*/
int InputBigNum(char n[])
{
  char tmp[LEN];  int i,m;
  for (i=0;i<LEN;i++)  {  n[i]=0;  }
  if(scanf("%s",tmp)<1)  {  return -1;  }
  m=strlen(tmp);
  for(i=0;i<m;i++)  {  n[i]=tmp[m-i-1]-'0';  }
}
 
/*OutputBigNum:傾印出數字*/
/*
輸入：要被印出來的數陣列名 無return
1.找到非0之數字開頭元素號p 找到f=1 @要是發現全部都是0找不到開頭則f=0
2.倒序轉成字元印出，個位最後傾印，印完不換行
  @要是發現全部都是0會印出一個0
*/
void OutputBigNum(char n[])
{
  int i,p,f=0;
  for(p=LEN-1;p>=0;p--)
  {  if(n[p]!=0)  {  f=1;  break;  }  }
  if(f)
  {  for(p;p>=0;p--)  printf("%c",n[p]+'0');  }
  else  {  printf("0");  }
}    
 
/*AddBigNum: 兩數相加*/
/*
輸入：被加數a，加數b，結果存放陣列c 無return
1.從個位開始一個個相加(a+b+tmp)，如有進位存放在tmp
*/
void AddBigNum(char a[], char b[], char c[] )
{
  int i,tmp=0;
  for(i=0;i<LEN;i++)
  {
    c[i]=a[i]+b[i]+tmp;
    if(c[i]>=10)  {  tmp=1; c[i]=c[i]%10;  }
    else{ tmp=0;  }
  }
}
/*SubBigNum 兩數相減*/
/*
輸入：被減數a，減數b,結果存放陣列c 有return(成功相減:1,a<b:0)
IF a<b則c不變;
0;檢查a是否>=b，若否則傳回-1結束
1.從個位開始一個個相減，結果加上10預防負數(a-b-tmp)
 若減出<10(原為負數)
 則tmp=1及把預防負數的10從結果裡減掉 
*/
int SubBigNum(char a[], char b[], char c[])
{
  int i,tmp=0;
  for(i=LEN-1;i>=0;i--)
  {
    if(a[i]>b[i])  break;
    if(a[i]<b[i])  {  return 0; } 
  }
  for(i=0;i<LEN;i++)
  {
    c[i]=a[i]-b[i]-tmp+10;
    if(c[i]<10)  {  tmp=1;  }
    else  {  tmp=0;  c[i]=c[i]-10;  }
  }
  return 1;
}
/*MulBigNum 兩數相乘*/
/*
輸入：被乘數a，乘數b,結果存放陣列c 無return
0.清空暫存結果的陣列d (用d的目的是避免c和a.b相同時出錯)
1.m=a,b兩者的位數和+1，作為結果可能的最大存位  
2.積的第n位數=a[n]b[0]+a[n-1]b[1]+.....a[0]b[n]+上一個位數的進位tmp 依此由[0]計算每個d
3.把d內數寫入c
*/
void MulBigNum(char a[], char b[], char c[])
{
  int i,j,tmp=0,m=0,d[LEN];
  for(i=0;i<LEN;i++)  {  d[i]=0;  }
 
  for(i=LEN-1;i>=0;i--)  {if (a[i]!=0)  break;  }
  m+=i;
  for(i=LEN-1;i>=0;i--)  {  if (b[i]!=0)  break;  }
  m+=i;
  m++;
  
  for(i=0;i<=m;i++)
  {
    for(j=i;j>=0;j--)
    {  d[i]+=a[j]*b[i-j];  }
    d[i]+=tmp;
    if(d[i]>=10)  {  tmp=d[i]/10;  d[i]=d[i]%10;  }
    else tmp=0; 
  }
  for(i=0;i<LEN;i++)  {  c[i]=d[i];  }
}

/*
陣列模擬簡單兩矩陣相乘 A[](mxn)、B[](nxp)
為了驗算數學而寫
使用DOS命令更改視窗大小標題及色彩
*/
#include <stdio.h>
#include <stdlib.h>
int m,n,p,i,j,k,l;
int main()
{
  system("title 矩陣乘法計算  By 彩");
  system("mode con cols=75 lines=30");
  system("color 8F");
  while(1)
  {
    printf("\n\n輸入矩陣A之列數m、行數及矩陣B之行數p\n");
    scanf("%d",&m);
    scanf("%d",&n);
    scanf("%d",&p);
    float a[m][n],b[n][p],c[m][p];
    
    printf("\n輸入A\n");
    for(i=0;i<m;i++)
    {
      for(j=0;j<n;j++)
      {  scanf("%f",&a[i][j]);  }
    }
    
    printf("\n輸入 B\n");
    for(i=0;i<n;i++)
    {
      for(j=0;j<p;j++)
      {  scanf("%f",&b[i][j]);  }
    }
    
    for(i=0;i<m;i++)
    {
      for(j=0;j<p;j++)
      {
        c[i][j]=0;
        for(k=0;k<n;k++)
        {  c[i][j]+=a[i][k]*b[k][j];  }
      }
    }
    
    printf("===============\n");
    for(i=0;i<m;i++)
    {
      for(j=0;j<p;j++)
      {  printf("%.1f   ",c[i][j]);  }
      printf("\n");
    }
  }
}
/*
轉用請附來源說明
以歌者之名流浪
http://jaacnaett.pixnet.net/blog/
*/

這個程式是給各位上電腦課的同學們，一個逃脫老師的監視廣播的機會XD
適用廣播軟體為 LanStar Visual Class不知道哪一版
編寫給抵死不想打開DOS輸入命令的人用，關閉Lanclt.exe
當初拿這個練習BAT腳本，本來只要一行的程式
為了嘗試加上版權輸出還有自我刪除等，被我搞成了十幾行
還算好的咧，剛剛在網上找到個大陸同學的作品
他為了個GUI介面，同樣是BAT，整整193行......牛B啊，真服了他。