function B2()

[h1,m1,s1] = s2hms(4000)

[h2,m2,s2] = s2hms(2000)

[h3,m3,s3] = s2hms(300)

[h4,m4,s4] = s2hms(7210)

function [h,m.s] = s2hms(sec)
% sec (seconds)
% sec = h hours, m minutes, and s seconds

% Implement this function