програма паскаль после начала экперимента прошло tчасов, m минут, k секунд. сколько секунд длится эксперимент

Question

Информатика

Нинура

7 июня, 16:19

програма паскаль после начала экперимента прошло tчасов, m минут, k секунд. сколько секунд длится эксперимент

+5

Ответы (1)

Знаете ответ?

Наркис · Answer 1

Program lab1;

var

t, m, k:integer;

begin

writeln ('vvedite chasi') ;

readln (t) ;

writeln ('vvedite minuti') ;

readln (m) ;

writeln ('vvedite k') ;

readln (k) ;

k:=t*3600+m*60+k;

writeln ('proshlo minut:', k) ;

end.