Pascal :

program aa;
var a,b,c,s:real;
begin
 writeln('100');
 writeln('120');
 writeln('40');
 write('160');
 end.