Составить программу на Паскале. Вася делает задачу за а часов, в минут, с секунд. Ему необходимо выполнить n задач. Сколько времени он потратит?
ПОМОГИТЕ ПОЖАЛУЙСТА 

спасибо большое

var a,b,c,n:integer;beginreadln(a);readln(b);readln(c);readln(n);a:=a*3600;b:=b*60;c:=(c+a+b)*n;a:=c div 3600;b:=(c div 60)-(a*60);c:=c-(b*60)-(a*3600);writeln('Часы: ',a,' Минуты: ',b,' Секунды: ',c);end.

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018// Внимание! Если программа не работает, обновите версию!begin  var (a,b,c):=ReadInteger3('Сколько часов, минут и секунд надо на задачу?');  var n:=ReadInteger('Сколько задач?');  var t:=n*(c+60*b+3600*a);  Write('Будет затрачено ',t div 3600,' час ');  t:=t mod 3600;  Write(t div 60,' мин ',t mod 60,' c')end.ПримерСколько часов, минут и секунд надо на задачу? 1 13 42Сколько задач? 6Будет затрачено 7 час 22 мин 12 c