begin
var m := ReadInteger('M -');
var n := ReadInteger('N -');
Range(M, N).Select(t -> t.ToString.ToCharArray
.Where(c -> c = '0').Count).Sum.Println
end.
begin
var m := ReadInteger('M -');
var n := ReadInteger('N -');
Range(M, N).Select(t -> t.ToString.ToCharArray
.Where(c -> c = '0').Count).Sum.Println
end.