计算机编程语言的发展趋势.pptVIP

//丙正正语言示例 空 象棋檔::設定註解(字元 *s,整數 n){若(n = 最大註解數)對於(;最大註解數 = n;最大註解數++)註解[最大註解數]=NONE;若(s==NULL 或 字串長度(s)==0)傳回;若(註解[n]!=NONE) 刪除 註解[n];註解[n]=新 字元[字串長度(s)+1];字串複製(註解[n],s);} #包含 “习语言系统.接口” //习语言代码示例 整数类型 主函数（）{ 文件类型 *fp; 整数类型 ch; 如果((fp=文件打开(练习13-2.文本,写+))==空指针){ 格式输出(无法打开文件：练习13-2.文本！ ); 暂停(); 退出(1); } 格式输出(输入一串字符:\n); ch=输入字符(); 若符合条件 (ch != 宏_换行键 ) 重复{ 文件写字符(ch,fp); ch=输入字符(); } 文件复位(fp); ch=文件读字符(fp); 若符合条件(ch!= 宏_文件结束 ) 重复{ 输出字符(ch); ch=文件读字符(fp); } 格式输出(\n); 文件关闭(fp)