vicvolf, что же Вы опять вопросом на вопрос...
Вы же все втроём говорите об одном и том же разными словами.
vicvolf, неужто Вы желаете начать терминологический спор?
А что думаете про кортеж, состоящий из 5 простых чисел?
Я думаю, что и в кортеже 3-36, и в кортеже 5-36, 2-я позиция магическая:
Код:
{print(); v=[0,6,18,30,36]; vc=vector(11); c1g1=vector(11);
p=13; mor=1; forprime(i=2,p,mor=mor*i);
forstep(i=1, mor,2,
for(j=1,#v,
if(
(i+v[j])%3 ==0 || (i+v[j])%5 ==0 || (i+v[j])%7 ==0 ||
(i+v[j])%11 ==0 || (i+v[j])%13 ==0 , next(2)));
len=2;
forstep(j=i+v[#v]-2,i+4,-2,
if(j%3<>0 && j%5<>0 && j%7<>0 && j%11<>0 && j%13<>0,len++));
j=i+2;
if(j%3<>0 && j%5<>0 && j%7<>0 && j%11<>0 && j%13<>0,len++;
c1g1[len]=c1g1[len]+2;
);
if(j%5==3 && j%7<>1, vc[len]=vc[len]+2);
);
print();
print(vc," ",vecsum(vc));
print();
print(c1g1," ",vecsum(c1g1));
print();
}quit;
Ведь я суммирую только по 2-й позиции и получаю правильные значения обоих массивов:
3-36 13#
vc = [0, 0, 0, 0, 6, 66, 330, 548, 258, 64, 8] sum = 1280
c1g1 = [0, 0, 0, 0, 2, 8, 76, 118, 114, 52, 8] sum = 378
5-36 13#
vc = [0, 0, 0, 0, 0, 0, 36, 150, 136, 54, 8] sum = 384
c1g1 = [0, 0, 0, 0, 0, 0, 6, 34, 50, 42, 8] sum = 140