Добавил:
t.me мой будущий Dungeon Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
0
Добавлен:
11.06.2025
Размер:
645 б
Скачать
global F
m = input('Введите положительное число: ');
F=zeros(1,m);
disp('Разложение на слагаемые: ');
i=1;
dec(F,m,m,i); % задаем аргументы функции
function dec(F,n,k,i)

if n < 0
elseif n == 0
for j=1:i
if j>numel(F) % индекс не превышает размерность массива
break;
end

if F(j)==0
disp(' ');
else
fprintf('%d ',F(j));
end
end
else
if n-k >= 0
F(i) = k;
dec(F, n-k, k, i+1);
end

if k-1>0
dec(F,n,k-1,i);
end
end
end
Соседние файлы в папке ЛР7