Question

1)Сначала суток прошло n секунд, определить: сколько полных часов прошло с начала суток, сколько полных минут прошло с начала текущего часа, сколько полных секунд прошло сначала текущей минуты.2)Производительность труда при выполнении некоторой работы повысилась на 40%. На сколько процентов сократилось время необходимое для выполнения этой работы.3)Велосипедист должен попасть в место назначения к определённому сроку. Известно, что если он поедет со скоростью 15 км в час, то приедет на час раньше, а если скорость будет 10 км в час, то опоздает на 1 час. С какой скоростью должен ехать велосипедист, чтобы приехать вовремя?решите в паскале без описания

Answer 1

1)
var
    sec: LongInt;

begin
    Write('sec = ');
    Readln(sec);
   
//    Assert((n >= 0) and (n <= 24 * 60 * 60), 'Не верный ввод');
    WriteLn('Time: ', sec div 3600, ':', sec div 60 mod 60, ':', sec mod 60);
end.

2)
const
    v = 1;

begin
    WriteLn(100 - 100 * (1 / ((1 + 0.4) * v)) / (1 / v));
end.

3)
а это просто математика
Система
S/15 = t-1
S/10 = t+1

Отсюда t = 5, s= 60
v = S/t = 60/5 = 12