Для ухаживания k дней подряд надо, чтобы k-e яблоко выросло к вечеру k-го дня. следовательно, начинать ухаживание можно не ранее, чем за k-1 день до вырастания последнего яблока. А поскольку на вырастание каждого яблока надо m дней, то k яблок вырастет в день номер m x k . Отступим от этой даты на k-1 день и получим p = m x k - (k -1)= k x (m-1) + 1
Проверим предложенную формулу на контрольном примере.
k=5, m=2, d=5x(2-1)+1=6.
var
m, n: integer;
begin
Write('Период созревания яблока, дней: ');
Readln(m);
Write('Количество дней ухаживания: ');
Readln(n);
Writeln('Номер первого дня ухаживания: ', n * (m - 1) + 1);
end.
Тестовое решение:
Период созревания яблока, дней: 2
Количество дней ухаживания: 5
Номер первого дня ухаживания: 6