Переведите числа в десятичную систему счисления 4533во 8, c49aв 16, 1011100011во 2.хорошие ! ​

4533₈  = 2395₁₀

C49A₁₆ =  50330₁₀

1011100011₂ = 739₁₀

Объяснение:

4533₈ = 3*8⁰ + 3*8¹ + 5*8² + 4*8³ = 2395₁₀

C49A₁₆ = A*16⁰ + 9*16¹ + 4*16² + C*16³ = 50330₁₀

1011100011₂ = 1*2⁰ + 1*2¹ + 0*2² + 0*2³ + 0*2⁴ + 1*2⁵ + 1*2⁶ + 1*2⁷ + 0*2⁸ + 1*2⁹ = 739₁₀

При протяжке выделенного диапазона Эксель определяет шаг между значениями и пытается автоматически построить последовательность с найденным шагом.
Январь имеет номер месяца 1, сентябрь - номер 9. Между ними 8 месяцев.
Тогда в А3 будет месяц номер 9+8=17. Но у нас 12 месяцев повторяются в цикле, поэтому вычитаем 12 и получаем 17-12=5. И в ячейке А3 будет месяц май.
В А4 будет месяц с номером 5+8=13, но 13>12, поэтому получим 13-12=1, а это январь. Январь у нас был, и что идет дальше известно: А5 - сентябрь, А6 - май, А7 - январь.
ответ: ЯНВАРЬ.

Числа вводятся пользователем. Прикрепил скрин работы программы, вот сама программа:

var a:array[1..999]of integer;
i,n:integer;
begin
write ('Введите кол-во чисел: ');
readln (n);
for i:=1 to n do
begin
write ('Введите ',i,' число: ');
readln (a[i]);
end;
WRITELN;
write ('Числа введённые пользователем: ');
for i:=1 to n do
write (a[i],' ');
WRITELN;
WRITELN;
write ('Положительные: ');
for i:=1 to n do
begin
if a[i]>0 then write (a[i],' ');
end;
WRITELN;
write ('Отрицательные: ');
for i:=1 to n do
begin
if a[i]<0 then write (a[i],' ');
end;
WRITELN;
write ('Чётные: ');
for i:=1 to n do
begin
if a[i] mod 2 = 0 then write (a[i],' ');
end;
WRITELN;
write ('Нечётные: ');
for i:=1 to n do
begin
if a[i] mod 2 <> 0 then write (a[i],' ');
end;
end.