campo-sirio/src/gfm/demo03.c
mtollari 1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00

19 lines
292 B
C
Executable File

#include <stdio.h>
#include "gm.h"
void main()
{
DEC da, *a=&da, db, *b=&db;
DEC *f;
char s[30];
do {
printf("Type a number: ");
scanf("%s",s);
f = ConvAsciiToDecimal(a,s);
} while (f == GM_NULL);
CopyDecimal(b,a);
ConvDecimalToAscii(s,b);
printf("You typed a %s\n",s);
}