Условие: На конференцию приехало N человек. Для их перевоза выделили автомобили вместимостью K и M человек (без водителя). К гостинице автомобили подаются в таком порядке: сначала вместимостью K человек, потом - M человек, после этого опять - K человек, потом M человек и так далее. В автомобиле можно перевозить не более максимально допустимого количества пассажиров. Определить, сколько необходимо автомобилей для перевозки всех делегатов конференции.
Технические условия: Программа должна читать исходные данные из файла input.txt, первая строка которого содержит количество делегатов, а вторая и третья - числа K и M. В файл output.txt должно выводиться количество машин, необходимых для перевозки всех делегатов.
Решение: Идея решения. До тех пор, пока число делегатов не будет равно нулю (пока всех не увезут), отнимаем от числа N число K, затем число M, и так далее..
var n,k,m:integer;i:integer; begin assign(input,'input.txt'); reset(input); read(n); read(k); read(m); i:=0; while N>0 do begin i:=i+1; if i mod 2<>0 then n:=n-k else N:=N-M; end; assign(output,'output.txt'); rewrite(output); writeln(i); end.
