maxmark=[40 50  30 40 ];   % A4 A3 A2 A1 
a=[
39 45 29 40 %92000183  
40 50 27 36 %????????  
40 46 30 39 %????????  
34 45 30 38 %92153379  
40 50 30 40 %92163017  
34 48 25 29 %94200612  
];
final=a*inv(diag(maxmark))*diag(weights);
final=sum(final');
final=final';
disp('arith recorded')
recorded=a(
[final recorded]