Необходимо получить такую натуральную последовательность максимальной длины, у которой каждый текущий элемент, начиная
160
409
Ответы на вопрос:
var n, i: Longint;
begin
Read(n); Write(n);
repeat
for i:=n div 2 downto 1 do
if n mod i=0 then begin
n:=i; Write(' ',n); Break;
end;
until n=1;
end.
begin
Read(n); Write(n);
repeat
for i:=n div 2 downto 1 do
if n mod i=0 then begin
n:=i; Write(' ',n); Break;
end;
until n=1;
end.
Мне кажется более созвучно
"Таня Николина"
"Татьяна Николина"
Объяснение:
И так и так
Популярно: Другие предметы
-
erekeshevadinar05.02.2023 07:37
-
gshsjtzjts10.01.2023 13:44
-
Кристина783618.08.2022 03:11
-
123Dulya02.10.2020 19:40
-
Aalina2322.05.2021 23:50
-
Makarzzz04.06.2023 03:45
-
Ganifa50516.10.2022 04:36
-
tikmehr12.01.2020 20:22
-
nastya345457833567814.05.2021 10:29
-
solnha25.12.2021 16:01