Составьте алгоритм, который в последовательности натуральных чисел а1, а2, а3 определяет сумму чисел кратных 5. Блок-схему нужно

Question

Информатика

Хрисанта

25 января, 09:39

Составьте алгоритм, который в последовательности натуральных чисел а1, а2, а3 определяет сумму чисел кратных 5. Блок-схему нужно

+4

Ответы (1)

Знаете ответ на вопрос?

Хезер · Answer 1

Var

a:array[1 ... 100000] of integer;

i, max, n:integer;

begin

Readln (n) ;

for i: = 1 to n do

read (a[i]) ;

max:=a[1]+a[n];

for i: = 2 to n div 2 do

if max < a[i] + a[n-i] then

max: = a[i] + a[n-i];

Writeln (max) ;

end.

вроде так