Найти сумму "n" чисел последовательности:2,7,12,17,...

Найти сумму "n" чисел последовательности:2,7,12,17,...
Гость
Ответ(ы) на вопрос:
Гость
program n_1;var i,n:byte;mass:array[1..100] of integer;summ:integer; beginWrite('Введите длину массива: ');readln(n);mass[1]:=2;for i:=2 to n do//beginmass[i]:=mass[i-1]+5;//Writeln(mass[i]); //end;summ:=mass[1]; for i:=2 to 15 dosumm:=abs(summ+mass[i]); Writeln('Сумма последовательности чисел равна: ',summ);end. Убери комментарии,чтобы показать всю последовательность.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы