028.从键盘读入实数

Posted 2022-04-28 程序员编程指南

#define ERR 5
#define OK 6
#include <stdio.h>
  
int status;
double result,sig,scale;
int sign(int c)/*处理数的符号函数*/

	if(c=='-')/*若为负号，置负数标记*/
		sig=-sig;


int integer(int c)/*转换整数部分，转换一位整数位*/

	result=result*10.0+c-'0';


int decimal(int c)/*转换小数部分，转换一位小数位*/

	result+=(c-'0')*scale;
	scale/=10.0;

/*状态表*/
int statbl[ ][4]=   1,2,3,ERR,/*0*/
	        ERR,2,3,ERR,/*1*/
	        OK,2,4,OK,/*2*/
	        ERR,4,ERR,ERR,/*3*/
	        OK,4,OK,OK;/*4*/
/*转换函数表*/
int(*funtbl[ ][4])( )=sign,integer,NULL,NULL,
	                NULL,integer,NULL,NULL,
	                NULL,integer,NULL,NULL,		
	                NULL,decimal,NULL,NULL,
                                    NULL,decimal,NULL,NULL;

int readreal(double *dp)

	int c,ckind;
	sig=1.0;
	result=0.0;
	scale=0.1;

	while((c=getchar( ))==' '||c=='\\n'||c=='\\t');/*跳过前导空白符*/
	status=0;/*置初始状态*/
	for(;;)
	
		/*分类当前字符*/
		if(c=='+'||c=='-') ckind=0;/*数的符号字符*/
		else if(c>='0'&&c<='9') ckind=1;/*数字符*/
		else if(c=='.') ckind=2;/*小数点*/
		else ckind=3;/* 其它字符 */

		if(funtbl[status][ckind])/* 如有转换函数 */
			(*funtbl[status][ckind])(c);/* 执行相应的函数 */
		status=statbl[status][ckind];/*设置新的状态*/
		if(status==ERR||status==OK)break;/* 结束：出错或成功 */
		c=getchar();
	
	ungetc(c,stdin); /* 归还数德结束符 */
	if(status==OK)
	
		*dp=result *sig;/* 读入数按指针参数赋给相应变量 */
		return 1;
	
	return -1; /* 出错返回 */

main()

	double x;
	clrscr();
	printf("\\nPlease input real numbers (use nonreal char to end input):\\n");
	while(readreal(&x)==1)
		printf("The real number you input is: %f\\n",x);
	printf("\\nYou have inputted nonreal char.\\n Press any key to quit...\\n");	
	getch();