Sientasul
4 год назад
В Берляндском государственном университете есть студенческий буфет. Рассмотрим его работу в один из учебных дней.Во всем университете n перемен, перед каждой из которых в буфет привозят ровно k булочек с маком (считаем, что в начале дня буфет пустой). Каждая булочка может храниться в буфете h перемен. В течение i-й перемены (1≤i≤n) в буфет приходят ровно ai студентов. Студенты приходят в буфет голодными, поэтому цель каждого из них — купить ровно одну булочку и стать сытым. Каждый студент может стоять в очереди за булочкой ровно один раз в день во время одной перемены. Сотрудник буфета работает с молниеносной скоростью, поэтому время продажи каждой булочки ничтожно мало и в условиях задачи роли не играет. Однако, если студенту не хватает булочки, он расстраивается и уходит голодным.Определите минимальное количество студентов, которые останутся голодными.Входные данныеПервая строка содержит три целых числа n, k, h (1≤n≤k≤105, 1≤h≤100) — количество перемен, количество булочек, привозимых в буфет перед каждой переменой, и срок хранения каждой булочки.Вторая строка содержит n целых чисел ai (1≤ai≤105) — количество студентов, пришедших в буфет на i-й перемене.Выходные данныеВыведите единственное целое число — минимальное количество студентов, которые останутся голодными.входные данные5 3 22 4 3 6 8выходные данные8
ОТВЕТЫ
Meissner Helga
Nov 16, 2020
var x,a,b,c,n:integer; f,f1:text;
begin
write(' vvedite chislo ');
assign (f, 'Digit.dat');
rewrite(f);
readln(x);
writeln(f,x);
close(f);
a:=x div 100;
b:=x mod 100 div 10;
c:=x mod 10;
if (a < b) and (a < c) then N:=10*b+c else if (a > b) and (b < c) then N:=10*a+c else N:=10*a+b;
assign(f1, 'Digit.sol');
rewrite(f1);
writeln('N=',N);
writeln(f1,N);
close(f1)
end.
567
