Определите вид ветвления (полное или неполное) и результат выполнения программы это сор,

1) Считываем n и просто в цикле по k от 1 до n прибавляем к текущей сумме новое слагаемое k²:

Код (Python 3):

n = int(input())

s = 0

for k in range(1, n + 1):

   s += k ** 2

print(s)

Пример ввода:

3

Пример вывода:

14

2) Аналогично, только считаем произведение, а не сумму.

Код (Python 3):

n = int(input())

p = 1

for k in range(1, n + 1):

   p *= k

print(p)

Пример ввода:

3

Пример вывода:

6

3) Тут соединяем вместе вычисление n! и суммирование.

Код (Python 3):

n = int(input())

p = 1

s = 0

for k in range(1, n + 1):

   p *= k

   s += p

print(s)

Пример ввода:

3

Пример вывода:

9

program raf105;

var i,min,kolN,sumN,sariN:integer;

a:array[1..30] of integer;

begin

writeln('Элементы массива:');

min:=99;

for i:=1 to 30 do

begin

 a[i]:= random(1,60);

 write(a[i],' ');

 if (a[i]<min) and ((a[i] mod 4)=0)

   then min:= a[i];

 if ((a[i] mod 2)<>0)

   then

   begin

     kolN:= kolN+1;

     sumN:= sumN+a[i];

   end;

end;

writeln;

if min=99

 then min:=0;

sariN:= round(sumN/kolN);

writeln('Минимальное значение среди чётных элементов кратных четырём:');

writeln(min);

writeln('Среднее арифметическое среди нечётных элементов:');

writeln(sariN);

end.

Язык программирования PascalABC