3 = 3 следует нет, ну а дальше 3+3=6 и 6-1=5 ответ: 5
Z=12+8=20
n=20/2=10
ответ 10
Ответ d) obar.txt вроде...
А) 2 6 10 14 18 22 26 30
б) 1 4 7 10 13 16 19
Свой ряд: 0 2 4 6 8 10 12 14 16 18 20
Const n = 5;
var
i, p, x:byte;
z: array[1..n] of byte;
begin
readln(x);
for i:=1 to n do
begin
readln(z[i]);
if z[i]=x then p:=i;
end;
writeln(p);
end.