-100111011101
-----------------------------
Вы пытаетесь прибавить один тип к другому. Попробуйте так: rb.position + new Vector2 (0, Vector.right)
Program nums;
<span>var num:array[1..1000] of integer;
</span><span>var i,maxnum: integer;
</span><span>
begin
</span><span>Randomize;
</span><span>for i:=1 to 1000 do num[i] := random(1000000);
</span><span>for i:=1 to 1000 do
</span><span>begin
</span><span>if num[i] > maxnum then maxnum:=num[i];
</span><span>end;
</span><span>Writeln('самое большое число ',maxnum);
</span><span>end.</span>
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a:=ReadArrReal('Вводите:',15);
a.PrintLines
end.
<h3>Вводить можно через пробел или Enter, неважно, в конце ввода нажать Enter. Числа могут иметь знак и дробную часть. Если надо.</h3>