编程在 matlab 中求:四叶玫瑰数是指四位数各位上的数字的四次方之和等于本身的数。求全部 四叶玫瑰数。

在 MATLAB 中可以使用循环和条件语句来求解全部四叶玫瑰数。具体实现如下：

% 初始化变量
count = 0; % 记录四叶玫瑰数的数量
result = []; % 保存四叶玫瑰数的数组

% 遍历所有四位数
for num = 1000:9999
    % 计算每一位上的数字的四次方之和
    digit_sum = sum(str2num(num2str(num)') .^ 4);
    
    % 判断是否为四叶玫瑰数
    if digit_sum == num
        count = count + 1;
        result(count) = num;
    end
end

% 输出结果
if count > 0
    disp(['共有', num2str(count), '个四叶玫瑰数，分别是：']);
    disp(result);
else
    disp('没有四叶玫瑰数');
end

运行后，将输出全部四叶玫瑰数。