подсчет суммы доз материала

[bango]

Ну и суммируйте данные
mass:= mass+n-доз;