c语言支持脚本编程,lr脚本编程C语言.docx

lr脚本编程C语言

1、#define COUNT 100#define SALARY 4000Action(){int total;total=COUNT*SALARY;lr_output_message("100人合计薪资支出为%d元",total);lr_output_message("100人合计薪资支出为%o元",total);lr_output_message("100人合计薪资支出为%x元",total);return 0;}2、#define PI 3.14Action(){float r=4.5,s;double r1=22.36,s1;long double r2=876.99,s2;s=PI*r*r;s1=PI*r1*r1;s2=PI*r2*r2;lr_output_message("半径为%.2f的面积为:%f.",r,s);lr_output_message("半径为%.2f的面积为:%f.",r1,s1);lr_output_message("半径为%.2f的面积为:%f.",r2,s2);return 0;}3、#define CHAR 'x'Action(){char x = 'y';intnum=121;lr_output_message("常量CHAR用字符表示为：c%",CHAR);lr_output_message("常量CHAR用整数表示为：d%",CHAR);lr_output_message("______________________________");lr_output_message("整形变量num用整形表示为：d%",num);lr_output_message("整形变量num用字符表示为：c%",num);lr_output_message("______________________________");lr_output_message("字符型变量x用整形表示为：d%",x);lr_output_message("字符型变量x字符表示为：c%",x);return 0;}4、#define STR "A"Action(){charCHAR ='A';lr_output_message("字符\'A\'占的空间大小为%d!",sizeof(CHAR));lr_output_message("字符串\"A\"占的空间大小为%d!",sizeof(STR));return 0;}5、Action(){intx,y,z;x=20;y=40;z=x+y;lr_output_message("%d+%d=%d",x,y,z);return 0;}6、double sqrt(double x);Action(){double x;sqrt(100);lr_output_message("%f",sqrt(100));return 0;}7、Action(){intrandomnumber;randomnumber =rand()%3+1;lr_output_message("%d",randomnumber);return 0;}8、Action(){inti=1;int sum=0;do{sum=sum+i;i++;}while (i<=100) ;lr_output_message("1至100之和是%d",sum);return 0;}9、Action(){inti;int sum=0;for(i=1;i<=100;i++)sum=sum+i;lr_output_message("1至100之和是%d",sum);return 0;}10、Action(){int count ,total=0;char buffer[1000];longfile_stream;char * filename="c:\\test.txt";if ((file_stream=fopen(filename,"r"))==NULL) {lr_error_message("不能打开%s文件！",filename);return -1;}while (!feof(file_stream)) {count=fread(buffer,sizeof (char),1000,file_stream);total+=count;if(total>=1000){fclose(file_stream);lr_output_message("文件的前1000个字符内容为：%s",buffer);break;}}return 0;}11、Action(){inti,j;for(i=1;i<=5;i++){if (i==3) break;elselr_output_message("i=%d",i);for(j=1;j<=5;j+