Зібралися Зеник і Марічка разом з пластунами в похід. Похід –
серйозна справа. Треба запастись продуктами харчування та
розподілити їх споживання по днях так, щоб всім вистачило. Цього
разу Зеник слідкує за тим, щоб печива вистачило аж до останнього
дня походу. Зеник чітко знає, скільки пачок печива повинно
залишитись кожного дня, і щовечора перераховує їх. Якщо Зеник
побачить, що залишилось менше пачок, ніж повинно залишитись за
його розрахунками, він неодмінно знайде того, хто з’їв забагато
печива, і покарає його.
Марічка дуже любить печиво. Сьогодні, коли всі пластуни
покинуть свої намети і підуть купатися в річку, Марічка планує
непомітно з’їсти трохи печива. Звісно, Марічка не хоче бути
покараною і дуже боїться, щоб Зеник не помітив пропажу.
Марічка підгледіла, скільки пачок печива є в рюкзаку Зеника.
Також вона знає, скільки штук в кожній пачці. Марічці не терпиться
дізнатися, скільки ж печива вона зможе з’їсти так, щоб Зеник не
помітив. Зеник помітить пропажу печива з деякої пачки тоді і
тільки тоді, коли Марічка повністю спустошить її.
Вхідні дані:
Перший рядок містить одне натуральне число N – кількість пачок
печива.
Другий рядок містить N натуральних чисел: i-те число означає
кількість штук печива в i-й пачці (Ai).
Вихідні дані:
Одне число – максимальна кількість штук печива, яку зможе
з’їсти Марічка так, щоб Зеник не помітив.
Обмеження:
20% тестів: N ≤ 1000, Ai ≤ 10000 (10^4)
60% тестів: N ≤ 100000 (10^5), Ai ≤ 10000 (10^4)
20% тестів: N ≤ 100000 (10^5), Ai ≤ 1000000000 (10^9)
Приклад вводу:
4
4 7 47 74
Приклад виводу:
128

Допоможіть розв'язати задачу, на сайті algotester "Неправильна відповідь 21"

program n0011;
var a,n,i,s:longint;
begin
  readln(n);
  for i:=1 to n do
    begin
    read (a);
    if a > 1 then
      s:=s+a;
    if (a = 1) then 
      s:= s+1;
    end;
  writeln(s-n);
end.