)Какую структуру Будет иметь метод решения последующей задачки? Дано целое положительное

Так как в программке предвидено два варианта финала, то структура таковой программки будет делится на две ветви.
Поначалу, чтобы найти ветвь, по которой будет происходить вычисление, нужно будет выставить условие.
Для данной программки оно будет таким:
if (N mod 2 = 0) then
По ветки с заглавием Да программка попадет в такое деяние:
for i:integer := 1 to N do
Nfs := Nfs * N;
По ветви с заглавием Нет программка попадет в такое действие:
for i:integer := 1 to N do
Nfs := Nfs + N;
Вывод результата с новейшей строчки:
writeln(Nfs);