Поделитесь своими знаниями, ответьте на вопрос:
Как в ms excel изменится число, если ему присвоить процентный формат? выберите один ответ: a. добавляется знак % b. отрицательное число представляется положительным и добавляется знак % c. число умножается на 100 и добавляется знак % d. отрицательное число представляется положительным, умножается на 100 и добавляется знак % e. число умножается на 10 и добавляется знак %
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 <= n do
begin
k := 0;
while n mod i = 0 do
begin
k := k + 1;
n := n div i;
end;
if i < n then
begin
if k = 1 then write(i, '*')
else if k > 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.