Объясните подробно как это решать: 1)укажите через запятую в порядке возрастания все десятичные числа, не превосходящие 25, запись которых в системе счисления с основанием 6 начинается на 4. 2)в системе счисления с некоторым основанием десятичное число 83 записывается в виде 123.укажите это основание. 3)запись числа 65(8) в некоторой системе счисления выглядит так: 311(nнайдите основание системы счисления n. у меня подобных 90 штук, много решать, за месяц все забыл.надеюсь кто-нибудь мне напомнит.

1) в первом просто берёшь и переводишь, грубо говоря, всё числа  от 0 до 25 с 10 системы, в 6 и смотришь какие числа начинаются на 4.  например            тут только три числа получилось.то есть ответ 4,40,41 2)мы знаем что      поскольку      то и    .  предположим что    . просто переведём      в десятичное  число, и  получаем      ответ 8. 3) третье точно такое как и 2, только сформулировано немножко по другому. опять же      соответственно    . глядя на разницу между 65 и  311, можно предположить, что n  как минимум в 2 раза меньше 8. поэтому допустим n=4. и проверяем    .  то  есть    .  это именно то, что нам  нужно. ответ    . надеюсь хоть чем  то ? )

Const     n = 10; var     a: array[1..n] of integer;     i,max,s: integer; begin randomize; s: =0; write('исходный массив: '); for i: = 1 to n do       begin       a[i]: =random(21)-10;       write(' ',a[i]);       end; writeln; max: =1; for i: = 2 to n do       if a[i]> a[max] then max: =i; writeln('max = a[',max,'] = ',a[max]); for i: = max+1 to n do       s: =s+a[i]; writeln('сумма элементов, стоящих за максимальным: ',s) end. пример: исходный массив: -4 10 7 5 6 10 -5 -8 -5 3 max = a[2] = 10 сумма элементов, стоящих за максимальным: 13

Program pas; const     n = 14; var     a: array[1..n] of integer;     i,max,min: integer; begin randomize; write('исходный массив: '); for i: = 1 to n do       begin       a[i]: =random(90)+1;       write(' ',a[i]);       end; writeln; max: =1; min: =1; for i: = 2 to n do       begin       if a[i]> a[max] then max: =i;       if a[i]< a[min] then min: =i;       end; writeln('max(a) = a[',max,'] = ',a[max]); writeln('min(a) = a[',min,'] = ',a[min]) end. пример: исходный массив: 66 70 88 36 30 11 53 1 57 77 6 40 65 46 max(a) = a[3] = 88 min(a) = a[8] = 1