Всё просто каждое получившаеся число поделите на 2. А потом в конце с конча до начала запишите числа. Напиример:110:2 равно55 также 55 делим на 2 и так до конца пока не получится 0 а потом с конца до начала запишите остатки!
3) ответ : 2) 13 тк 1 корневой + 3 первых* 4 вторых
4) ответ: 1,2,3
Ответа на вопрос не последовало. Поэтому привожу решение в пакете Maple 15 (см. вложение)
А экстремумов у этой функции нет...
Var n,d,a1,a0,i:integer;
begin
writeln('d=');
read(d);
writeln('n=');
read(n);
writeln('a1=');
read(a1);
a0:=a1;
for i:=2 to n do
a0:=a0+d;
writeln('Сумма равна');
writeln(a0);
<span>end.
.</span>