Составить программу вычисления выражения 1k + 2k + … + nk

Даны натуральные числа n и k. Составить программу вычисления выражения 1k + 2k + … + nk. Для решения задачи нужно организовать два цикла, один из которых поместим внутрь другого. Такие конструкции называют вложенными циклами.

Решение

Для вычисления указанной суммы целесообразно организовать цикл с параметром i

for i:=1 to n

в котором, во-первых, вычислялось бы очередное значение y = ik

y:=y*k

и во-вторых, осуществлялось бы накопление суммы прибавлением полученного слагаемого к сумме всех предшествующих (s = s + y).

s:=s+y

Код:

program Vychislenie_vyrazheniya;
var n, k, y, i, s, m: integer;
begin
   writeln(‘Введите значения n и k’);
   readln(n,k);
   s:=0
   for i:=1 to n do begin
     y:=1;
     for i:=1 to k do begin
       y:=y*i;
     end;
     s:=s+y;
   end;
   wtiteln(‘Ответ: ‘, s);
end.

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *

два × четыре =