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

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.
переведите на питон

Показать ответ
Ответ:
23149004316
23149004316
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-бота