Melisaoz07

20.05.2023 07:23

Информатика

Есть ответ 👍

Для того чтобы проверить, как ее ученики умеют считать, мария ивановна каждый год задает им на дом одну и ту же – «для заданного натурального a найти минимальное натуральное n такое, что n в степени n (n, умноженное на себя n раз) делится на a». из года в год и от ученика к ученику меняется только число a. вы решили будущим поколениям. для этого вам необходимо написать программу, решающую эту формат входных данных. во входном файле содержится единственное число a (1  a  109). формат выходных данных. в выходной файл вывести единственное число n. примеры. input.txt output.txt 8 4 13 13 имя входного файла input.txt. имя входного файла output.txt. максимальное время работы на одном тесте – 2 сек. максимальное время работы на одном тесте – 2 сек. максимальный объем используемой памяти 32 мегабайта

128

439

Посмотреть ответы 2

Ответы на вопрос:

Mercedess65amg

Информатика

4,5(83 оценок)

program jopascal;

var

i, a: longint;

u, j,

n, m : longint;

function fdiv (a, left : longint) : longint;

var

i : longint;

begin

d : = 1;

for i : = left to trunc (sqrt (a)) do

if (a mod i = 0)

then

begin

d : = i;

break;

end;

if (d < > 1)

then

fdiv : = d

else

fdiv : = a;

end;

function g (n, u : longint) : longint;

var

i : longint;

begin

i : = 0;

while (n mod u = 0)

begin

inc (i);

n : = n div u;

end;

g : = i;

end;

begin

assign (input, 'input.txt');

assign (output, 'output.txt');

reset (input);

read (a);

close (input);

m : = 0;

n : = 1;

i : = fdiv (a, 2);

u : = 2;

while (a > 1)

begin

n : = n * i;

j : = 0;

while (a mod i = 0)

begin

inc (j);

a : = a div i;

end;

if (j > m)

then

begin

m : = j;

u : = i;

end;

i : = fdiv (a, i + 2);

end;

x : = 1;

while (g (n * x, u) * n * x < m)

inc (x);

n : = n * x;

rewrite (output);

write (n);

close (output);

end.

Помогитемне11111119

Информатика

4,6(1 оценок)

For i: =0 to 10 do a[10-i]: = i ; k: = a[9] из этих двух строк видим, что k = 1.значит уже можно сделать вывод, что ответ -- 2, т.к. только там a[1] = 1, а именно значение k мы присваиваем a[1]. в принципе этого достаточно, дальше рассматривать нет смысла особо.если хочется можно вручную проделать цикл и убедиться, что a[0] действительно принимает значение 10, a[2] -- 9 и так далее.впрочем, повторюсь, это уже лишнее.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.