#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: %fn”,x);
printf(“nYou have inputted nonreal char.n Press any key to quit…n”);
getch();
}
转自公众号：
南昌青少年编程