clear all; 
f = fopen("factorial.txt", "r");
fact = fscanf(f, "%g");
fclose(f);