// Scilab code Exa1.8 :  : Page 53 (2011)
clc; clear;
a = 17.78e-03;            // First doublet mass difference, u
b = 72.97e-03;            // Second doublet mass difference, u
c = 87.33e-03;             // Third doublet mass difference, u
M_H = 1+1/32*(4*a+5*b-2*c);        // Mass of the hydrogen,amu
printf("\nMass of the hydrogen: %8.6f amu",M_H);

// Result
// Mass of the hydrogen: 1.008166 amu