<span>Вариант в Excel.
Внизу ярлыки листов с задачами. В строке формул проверяем функции. Лист защищен
без пароля, чтобы не повредить формулы. </span>
Var
n, i, s: integer;
begin
readln(n);
s := 2 * n;
i := 1;
repeat
s := s + 2 * (n + i);
i := i + 1;
until i > n;
writeln(s);
end.
Ответ: алгоритм - 12121(но это для нахождения числа 30, потому что число 60 получить невозможно
Пользователь (то есть ты) или система!