1787. Поворот на МЕГУ Светофор, установленный на повороте в торговый центр «МЕГА» с Новомосковского тракта, работает в таком режиме, что за одну минуту повернуть успевают k машин. По выходным, когда жители города едут закупаться продуктами и одеждой, перед этим поворотом вырастает огромная пробка. Администрация торгового центра дала указание повесить под строящимся неподалёку мостом камеру, подсчитывающую количество автомобилей, подъезжающих к этому повороту со стороны города. По информации, полученной с камеры за n минут с начала наблюдений, определите количество машин, стоящих в пробке в настоящий момент времени.
Исходные данные
В первой строке записаны целые числа k и n (1 ≤ k, n ≤ 100) — количество машин, успевающих повернуть на «МЕГУ» в течение минуты, и количество минут с начала наблюдений. Во второй строке через пробел записаны целые числа a1, …, an (0 ≤ ai ≤ 100), где ai — количество машин, подъехавших к повороту со стороны города в течение i-й минуты. Можно считать, что наблюдения начинаются рано утром, когда машин, ожидающих на повороте, ещё нет.
Результат
Выведите количество машин, стоящих в пробке на повороте через n минут после начала наблюдений.
РЕШИТЬ! НА ЯЗЫКЕ ПИТОН.
Все возможные варианты:
101 116 131 146 161 176 191 206 221 236 251 266 281 296 311 326 341 356 371 386 401 416 431 446 461 476 491 506 521 536 551 566 581 596 611 626 641 656 671 686 701 716 731 746 761 776 791 806 821 836 851 866 881 896 911 926 941 956 971 986
Пример программы (и, соответственно, алгоритма), при которого можно получить такой список - во вложении.
A:array[1..10000,1..10000] of integer;
i,j,N:integer;
S,P:real;
Begin
Randomize;
P:=1;
Write('N = ');ReadLn(N);
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
A[i,j]:=random(21)-10;
Write(A[i,j]:3,' ')
End;
WriteLn
End;
j:=1;
Repeat
S:=0;
For i:= 1 to N do
S:=S+A[i,j];
P:=P*S;
j:=j+2;
Until j>N;
WriteLn('P = ',P);
End.
N = 7
-8 4 4 6 -6 -3 1
-6 -6 8 7 8 8 2
5 -2 5 7 -4 9 -1
0 10 2 -5 9 9 3
2 8 2 -10 -6 -4 -6
-7 3 -4 9 2 4 -3
6 4 -3 0 1 4 -5
P = 4032