Формула указана не ясно в задании, я указал в ответе так как оно более менее смотрится понятно, но вам стоит уточнить. Что до алгоритма, то он выглядит вот таким вот образом. Внимание, первый член данного ряда считается за 0, вам стоит так же уточнить у преподавателя, в задании этого явно не указано, но зачастую такое значение традиционно.

Ошибки в вашем алгоритме:
1. У вас условие k < 0, это значит, что если будет введено k = 0, то алгоритм отработает, но 0 членов быть не может, это не имеет смысла.
2. Цикл у вас выводит значение n-го члена после каждой итерации, а не единожды.

Спасибо за отметку "Лучший ответ" и нажатую кнопочку "спасибо" (:

0 0

4 года назад

Помогите составить программу вычисляющая произведение натуральных чисел от 3 до n и выводит результат на экран как можно быстрее

Julia Fatieva

Progtam asd;
Uses crt;
Var a,n,s:integer;
begin
readln (n);
for a:=3 to n do
s:=a+s;
end.

0 0

4 года назад

Расположи пасажиров и багаж в вагонах поезда в соответствии со списками, информатика

Эйрин [269]

С какими списками? Я не знаю по какому учебнику вы учитесь)

0 0

4 года назад

Составить программу вывода на экран всех трёхзначных чисел , кратных 81. Pascal Пожалуйста

denis-ptrv

===== PascalABC.NET =====

begin

foreach var n in Range(100, 999) do

if n mod 81 = 0 then

Print(n)

end.

0 0

4 года назад