напишите программку, которая выводит в одну строку все делители передонного ей

моя цель обычно самообучение, поэтому я делаю на наиболее комфортном для задачки языке. Это в большенстве случаев. Время от времени охото и помочь и прочее

Тут все задачки наиболее просто и красиво решаются на PascalABC.Net 3.0, но Вы его не изучаете. Окончательно, Для вас виднее, что Для вас необходимо. Но, еще раз: конкретно эта версия языка создана, чтоб решать школьные и (да и вузовские задачи из непрофильного университета) наиболее живо, просто и понятно. Просто писать и просто инспектировать.

В этот Паскаль вошло все что нужно и из С++, и из Хаскеля и из иных программных приборов.

не все. К примеру в руби очень комфортно работать с системами счисления. 4.to_s(2) и получаешь двоичное представление, 56.to_s(36) и в 36ричное представление, нигде в другом так просто и просто не видела. В каждом языке есть свои приимущества и недочеты. У паскаля много недостатков, поэтому что язык ветхий, многих плюшек не имеет, много писать.

Т.е. достоинство Руби - работа с системами счисления по различному основанию? И что, много таких задач есть, где надо это делать конкретно в программке? Я встречал за все время около 10-ка таких задач, да и то они олимпиадные были, а это воспрещено.

Собственно, я написал две небольшие процедурки в Паскале для перевода чисел Х(10) -> X(n) и X(n) -> X(10) и в сходственных случаях их вставляю.

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

Понятно. Паскаль ABC.Net 3.0 компилятор, но когда в нем работаешь, разумеешь что он фактически скриптовый и к тому же, скоростной.

Высочайшая скорость на самом деле нужна очень изредка ведь программки то учебные

Время от времени посещает нужна... когда просят 10^9 циклов...

// PascalABC.NET 3.0, сборка 1128
var
  i,j,k,n,p:longint;
  f:array[1..10,1..2] of longint;
begin
  p:=2; i:=1;
  f[1,1]:=1; f[1,2]:=1;
  Write('Введите естественное число не больше 2 147 483 647: ');
  Read(n);
  while nlt;gt;1 do begin
    if (n mod p)=0 then begin
      if f[i,1]lt;gt;p then
      begin Inc(i); f[i,1]:=p; f[i,2]:=1 end
      else Inc(f[i,2]);
      n:=n div p
    end
    else inc(p)
  end;
  k:=i;
  for i:=2 to k do
    for j:=1 to f[i,2] do Write(f[i,1],' ');
  Writeln
end.

Тестовое решение:
Введите натуральное число не больше 2 147 483 647: 37534
2 7 7 383