Задача 1. Массив А вводится с клавиатуры. Найти сумму его элементов. Размер произвольный.
const
n=3;
var
a:array[1..n] of integer;
i,s:integer;
begin
s:=0;
for i:=1 to n do
begin
write('Введите a[',i,']=');
readln(a[i]);
s:=s+a[i];
end;
writeln('S=',s);
end. Задача 2. Массив А вводится с клавиатуры. Найти среднее арифметическое его элементов с нечетными номерами. Размер произвольный.
const
n=5;
var
a:array[1..n] of integer;
i,ind:integer;
s,sr:real;
begin
for i:=1 to n do
begin
write('Введите...
Как-то раз ко мне на собеседование пришёл синьор-разработчик. Сходу сказал, что его услуги стоят не меньше чем 250, но у нас очень интересная компания, так что он согласен и на 180 — в общем, сразу ясно, перед нами уверенный в себе профессионал. Ради шутки я все таки задал свой любимый разминочный вопрос: как посчитать сумму числового массива numbers = [90, 12, 76]? Парень сразу скукожился, 10 минут думал, затем сказал, что забыл повторить эту продвинутую тему. Дальше беседа уже как-то не клеилась...