Question

в одномерном массиве С ( 20 ) просуммировать первый элемент с последним, второй с предпоследним и т.д. Результат записать а массив В ( 10 ) и в нем найти наибольший элемент.

Answer 1

var i,m,n,u:integer;
c:array[1..20] of integer;
b:array[1..10] of integer;
begin
m:=1;
n:=20;
u:=1;
for i:=1 to 20 do
read(c[i]);
for i:=1 to 10 do
begin
b[i]:=c[m]+c[n];
m:=m+1;
n:=n-1;
end;
for i:=1 to 10 do
if b[i]>b[u] then u:=i;
write(b[u]:4);
end.

Answer 2

недоделал

Answer 3

щас допишу =

Answer 4

ок

Answer 5

жду

Answer 6

спасибо

Answer 7

Вот тебе с "дружеским" интерфесом

4b4201bf383e1b0dc7d73ee7ff4fe045.txt

Answer 8

спасибо