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

Question

Информатика

Бронислава

23 сентября, 00:45

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

+4

Ответы (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.