Дано натуральное число t- длительность прошедшего времени в секундах. вывести данное значение длительности в часах, минутах и секундах в следующей форме: нн ч мм мин ss с. ( паскаль )

program kvadrat;

var i : integer;

begin

for i: = 10 to 100 do

writeln ( i: 2, i*i : 5);

readln;

end. 

ввод x = 1, y = 3

x = 3 - 1= 2

y = 2 * 2 = 4

x = 2 * 4 + 2 = 10

y = 4 + 10/2 = 9

вывод x = 10, у = 9

ответ. в результате работы программы получим: х = 10, у = 9.