Неправильно записан ответ на последний пример. Исправь.
А закономерность очень простая. Первоначально идет повышение на одну единицу (т.е. 1 → 2 → 3→...), а в дальнейшем понижение на одну единицу (т.е. ...→3→2→1)
Собственно и все :)
Var h1,h2,m1,m2,s1,s2,s:integer;
begin
write('Введите время первого события: ');
readln(h1,m1,s1);
write('Введите время второго события: ');
readln(h2,m2,s2);
s:=h2*3600+m2*60+s2-h1*3600-m1*60-s1;
writeln('Число секунд между ними: ',s);
<span>end.</span>
Программное обеспечение, софт.
Арфа, гусли, гитара, балалайка, домра.
375 Киболайт = 375 * 1024 * 8 = 3072000 бит
3072000 : 128000 = 24 с
Ответ. Понадобится 24 с.