29 ноября, 17:25

Дано натуральное число n. Вычислить через while и for

S=1∙2+2∙3+3∙4+⋯+n∙ (n+1)

0
Ответы (1)
  1. 29 ноября, 17:34
    0
    var n, I, s, sum:integer;

    begin

    writeln ('ввести огрничение n');

    readln (n);

    sum:=0;

    for i:=1 to n do begin

    s:=i * (i+1);

    sum:=sum+s;

    writeln (sum);

    end;

    readln

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Дано натуральное число n. Вычислить через while и for S=1∙2+2∙3+3∙4+⋯+n∙ (n+1) ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы