Программирование//ТУСУР (Решение → 49892)

Описание

Ответ на скрине после покупки

Оглавление

type time = record h {час}: 0..23; m {минута}, s {секунда}: 0..59 end;Описана процедура next(t, t1), присваивающая параметру t1 время, на 1 секунду меньшее времени t (учитывается смена суток).В какой

type time = record h {час}: 0..23; m {минута}, s {секунда}: 0..59 end;

Описана процедура next(t, t1), присваивающая параметру t1 время, на 1 секунду меньшее времени t (учитывается смена суток).

В какой строке достаточно сделать небольшие изменения, чтобы эта программа правильно решала задачу?

procedure next(t, t1: time);begin t1:=t;with t1 doif s>0 then s:=s-1else begins:=59;if m>0 then m:=m-1else begin m:=59; h:=(h-1) mod 24 end end end