Как решить первую задачу А. ЛИФТ

Ответ:

program Elevator;

var

 n, k, a, b: Integer;

 s: string;

begin

 Write ('Введите n, k, a, b: ');

 ReadLn (n, k, a, b);

 WriteLn ('На лифте = ', (k + n - 2) * b, '  По лестнице = ', (n - 1) * a);

 ReadLn;

end.

Объяснение:

по лестнице:

n - 1 этажей, а секунд на этаж, время = (n - 1) * a

n - 1 потому, что Миша находится на первом этаже, а не на нулевом

на лифте:

лифт едет на 1-этаж: k - 1

Миша едет к себе: n - 1

всего этажей = (k - 1) + (n - 1) = (k + n + 2)

общее время = (k + n + 2) * b