Составьте программу разложения данного натурального числа на ...
Составьте программу разложения данного натурального числа на простые множители. Например, 200 = 2^3 × 5^2 × это умножить
Есть ответ
12.12.2022
161
Ответ
var
n, i, k: integer;
begin
repeat
write('Введите натуральное число n= ');
read(n);
until n > 0;
if n = 1 then writeln('Невозможно разложить на произведение простых множителей.')
else
begin
write(n, '=');
i := 2;
while i 1 then write(i, '^', k, '*');
end
else
begin
if k = 1 then write(i)
else if k > 1 then write(i, '^', k);
end;
i := i + 1;
end;
end;
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022