РЕШИТЬ НА PASCAL
Один из самых маленьких фруктов, не совсем привычный для нас и далеко не всем известный – Рамбутан. На дереве плоды рамбутана растут небольшими гроздьями. Посчитайте количество плодов на дереве, если известно, что там растет M гроздьев с разным количеством плодов.
Формат ввода:
M – количество гроздьев (M<=12)
a[1] – количество плодов, первая гроздь
а[2] – количество плодов, вторая гроздь
…
а[M] – количество плодов, M-ая гроздь
Пример ввода:
7
17
15
20
22
14
15
16
Формат вывода:
s – количество плодов на всем дереве
Пример вывода:
119
Один из самых маленьких фруктов, не совсем привычный для нас и далеко не всем известный – Рамбутан. На дереве плоды рамбутана растут небольшими гроздьями. Посчитайте количество плодов на дереве, если известно, что там растет M гроздьев с разным количеством плодов.
Формат ввода:
M – количество гроздьев (M<=12)
a[1] – количество плодов, первая гроздь
а[2] – количество плодов, вторая гроздь
…
а[M] – количество плодов, M-ая гроздь
Пример ввода:
7
17
15
20
22
14
15
16
Формат вывода:
s – количество плодов на всем дереве
Пример вывода:
119
More Questions From This User See All
Answers & Comments
var
M,s,i,a:integer;
begin
s := 0;
read(M);
for i := 1 to M do
begin
read(a);
s := s + a;
end;
writeln(s);
end.