1program digits(output); 2var r: real; 3begin 4r := 0.; 5r := .0; 6r := 1.e10; 7r := .05e-10; 8writeln(r) 9end. 10