Question

Сделать в Free Pascal. В салон красоты пришло n девушек. Каждая из них должна посетить парикмахера и косметолога. У каждого она проводит по m часов. За какое наименьшее время k сотрудников салона красоты смогут обслужить всех девушек, если каждый сотрудник может выполнять функции как косметолога, так и парикмахера? Входные данные три натуральных числа k, m, n( все числа не больше 10 000). Исходные данные одно число – минимальное время в часах, которое требуется для обслуживания всех девушек.

Answer 1

Begin
  write('n m k через пробел: ');
  readln(n,m,k);
  s:=2*n*m;
  p:=0;
  repeat
    s:=s-k*2*m;
    p:=p+1;
  until s<=0;
  p:=p*2*m;
  writeln('время: ',p);
end.

n m k через пробел: 3 2 5
время: 4

n m k через пробел: 6 2 4
время: 8