найти произведение 15 чисел последовательнрсти 3,10,17,24,... (Паскаль)
Ответы на вопрос
Ответил AwePlaxa
0
program n_1;var i:byte;mass:array[1..15] of integer;pr:integer;
beginmass[1]:=3;for i:=2 to 15 dobeginmass[i]:=mass[i-1]+7;Writeln(mass[i]);
end;pr:=mass[1];
for i:=2 to 15 dopr:=abs(pr*mass[i]);
Writeln('Произведение последовательности чисел равна: ',pr);end.
beginmass[1]:=3;for i:=2 to 15 dobeginmass[i]:=mass[i-1]+7;Writeln(mass[i]);
end;pr:=mass[1];
for i:=2 to 15 dopr:=abs(pr*mass[i]);
Writeln('Произведение последовательности чисел равна: ',pr);end.
Ответил Raiden3
0
Ну для 9 класса да. Мы ещё не проходили такие формулы)
Ответил AwePlaxa
0
id318983607
Ответил AwePlaxa
0
напиши в вк
Ответил AwePlaxa
0
в вк скину
Ответил Raiden3
0
хорошо)
Новые вопросы
Геометрия,
2 года назад
История,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад
Математика,
9 лет назад