В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
дильназ149
дильназ149
24.03.2023 20:33 •  Информатика

program task;
var
n, i, power, copy: integer;
flag: boolean;

begin
readln( n );
copy := n;
i := 2;
flag := false;
while copy <> 1 do begin
while copy mod i <> 0 do
i := i + 1;
power := 0;
while ( copy mod i = 0 ) do begin
copy := copy div i;
power := power + 1;
end;
if flag then write( '*' )
else flag := true;
if power > 1 then
write( i, '^', power )
else
write( i );
i := i + 1;
end;
writeln;
end.
переведите на питон

Показать ответ
Ответ:
ЛенаС123
ЛенаС123
19.08.2020 01:49

power = 0

n = int(input())

copy = n

i = 2

flag = False

while copy != 1:

   while copy % i != 0: i += 1

   power = 0

   while copy % i == 0:

       copy //= i

       power += 1

   if flag: print('*', end = '')

   else: flag = True

   if power > 1: print(str(i) + '^' + str(power), end = '')

   else: print(i, end = '')

   i += 1

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота