Програмисты ( pascal ) дана строка s и символ а. удвоить данный символ в строке (чтобы из 12ав получилось 1122аавв

// PascalABC.NET 3.6.3

uses School;

function Divizors(n: integer): List<integer>;

begin

 var L := new List<integer>;

 L.Add(1);

 L.Add(n);

 if n > 3 then

   begin

   var k := 2;

   while (k * k <= n) and (k < 46341) do

   begin

     if n mod k = 0 then

     begin

       var t := n div k;

       L.Add(k);

       if k < t then L.Add(t)

       else break

     end;  

     Inc(k)

   end;

   L.Sort;

 end;

 Result := L

end;

begin

 // 1

 if ReadInteger.IsPrime then Println('YES')

 else Println('NO');

 // 2

 ReadInteger.Factorize.First.Println;

 // 3

 var a := Divizors(ReadInteger);

 Print(a.Count, a.Sum)

end.

newzhook.com/story/full-watch-parasite-2019-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-gentlemen-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-gentlemen-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-survive-the-night-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-survive-the-night-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-intuition-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-intuition-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-call-of-the-wild-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-call-of-the-wild-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-underwater-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-underwater-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-choked-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-choked-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-vast-of-night-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-vast-of-night-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-debt-collectors-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-debt-collectors-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-justice-league-dark-apokolips-war-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-justice-league-dark-apokolips-war-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-high-note-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-high-note-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-trolls-world-tour-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-trolls-world-tour-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-think-like-a-dog-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-think-like-a-dog-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-way-back-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-way-back-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-platform-2019-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-platform-2019-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-the-lighthouse-2019-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-lighthouse-2019-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-love-stage-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-love-stage-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-laxmmi-bomb-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-laxmmi-bomb-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-my-spy-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-my-spy-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-gabriels-inferno-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-gabriels-inferno-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-i-still-believe-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-i-still-believe-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-emma-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-emma-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-escape-from-pretoria-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-escape-from-pretoria-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-brahms-the-boy-ii-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-brahms-the-boy-ii-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-harriet-2019-full-hd-movie-online-free/

newzhook.com/story/full-watch-harriet-2019-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-greenland-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-greenland-2020-streaming-movie-online-hd-free/

newzhook.com/story/full-watch-greyhound-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-greyhound-2020-full-hd-movie-online-free/

newzhook.com/story/123movies-watch-the-spongebob-movie-sponge-on-the-run-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-the-spongebob-movie-sponge-on-the-run-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-body-cam-2020-full-hd-movie-online-free/

newzhook.com/story/full-watch-body-cam-2020-streaming-movie-online-hd-free/

newzhook.com/story/123movies-watch-legacy-2020-full-hd-movie-online-free/