# // Calculate < P_RUSSIAN_STATISTICS 'Average, RUSSIAN_STATISTICS Rows[], INT Array_length >   
+
  RecordsIn (Rows, Array_length, (P_RUSSIAN_STATISTICS Row) ->            

    #for Field_name in RS/FIELD_NAMES write

    Average->Field_name += 1 [ Row->Field_name ] | 0

    #end

  )

  #for Field_name in RS/FIELD_NAMES write

  Average->Field_name /= Length

  #end

;