ВА
Валерия Антонова
дано массив с А с 14 элементов. Напечатать следующую последовательность (а1+а14, а2+а13...а7+а8)
нужно сделать на паскале
нужно сделать на паскале
а ЯП какой?
var
mas: array [1..14] of integer;
i: integer;
begin
randomize;
write('исходный массив: ');
for i := 1 to 14 do
begin
mas[i] := random(100);
write(mas[i]:4);
end;
writeln;
writeln('результат: ');
for i := 1 to 7 do
writeln(mas[i], ' + ', mas[15 - i], ' = ', mas[i] + mas[15 - i]);
end.
a[] = [a1,a2,...
length = 14;
for i=1 to length/2 do
begin
writeln(a[i]+a[length-i+1]);
end
как-то примерно так (возможны ошибки синтаксиса, но логика правильная)