<u>// PascalABC.NET 3.3, сборка 1573 от 04.11.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var s:=ReadlnString('Введите целое число:');
var n:integer;
if integer.TryParse(s,n) then Writeln('Корректно')
else Writeln('Ошибка ввода')
end.
Есть переменная, равная 0 и есть цикл в котором сравнивается поочередно значения из массива и эта переменная, если значение переменной меньше, то переменная принимает значение данного элемента массива.
В итоге переменная содержит самое большое значение из массива.
Складываем "в столбик"
123
+132
------
321
Обратим внимание на правый (младший) разряд. 3+2=1. Конечно же понятно, что не 1, а 11 - был перенос +1 в старший разряд.
Но в привычной десятичной системе счисления 3+2=5 и остается решить вопрос нахождения такого основания системы счисления х, при котором 5 превращается в 11.
1×х+1 = 5 → <u>x=4 </u>- это и есть ответ.
Можно проверить: 123₄ + 132₄ = 321₄ - все верно.