program ideone(input, output);
type
num = 0..5;
stinfo = record
	name, stid : char;
	math : integer;
	eng : integer;
	soc : integer;
	total : integer;
	end;
 
var
st : stinfo;
i : integer;
pp : array[num] of record;
 
function student() : record
begin
	read(st.name, st.stid);
	read(st.math, st.eng, st.soc);
	st.total := st.math + st.eng + st.soc;
	return st;
end;
 
begin
	i := 0;
	while(not EOF) and (i < num) to do
	begin
		pp[i] := stdent();
		i := i=1;
	end;
 
end.
 

cHJvZ3JhbSBpZGVvbmUoaW5wdXQsIG91dHB1dCk7CnR5cGUKbnVtID0gMC4uNTsKc3RpbmZvID0gcmVjb3JkCgluYW1lLCBzdGlkIDogY2hhcjsKCW1hdGggOiBpbnRlZ2VyOwoJZW5nIDogaW50ZWdlcjsKCXNvYyA6IGludGVnZXI7Cgl0b3RhbCA6IGludGVnZXI7CgllbmQ7CgkKdmFyCnN0IDogc3RpbmZvOwppIDogaW50ZWdlcjsKcHAgOiBhcnJheVtudW1dIG9mIHJlY29yZDsKCmZ1bmN0aW9uIHN0dWRlbnQoKSA6IHJlY29yZApiZWdpbgoJcmVhZChzdC5uYW1lLCBzdC5zdGlkKTsKCXJlYWQoc3QubWF0aCwgc3QuZW5nLCBzdC5zb2MpOwoJc3QudG90YWwgOj0gc3QubWF0aCArIHN0LmVuZyArIHN0LnNvYzsKCXJldHVybiBzdDsKZW5kOwoKYmVnaW4KCWkgOj0gMDsKCXdoaWxlKG5vdCBFT0YpIGFuZCAoaSA8IG51bSkgdG8gZG8KCWJlZ2luCgkJcHBbaV0gOj0gc3RkZW50KCk7CgkJaSA6PSBpPTE7CgllbmQ7CgkKZW5kLgo=