1. Какие существуют официальные сайты в профессиональной деятельности?
2. Что представляет собой единый реестр свидетельств о государственной регистрации?
3. Какую информацию содержит реестр свидетельств о государственной регистрации?

Var a,max,sum:integer;
    arr:array [0..2015] of integer;
    begin
randomize;
max:=-500;
sum:=0;
for a:=0 to 2015 do begin
arr[a]:=random(1001)-500;
if max<arr[a] then max:=arr[a];
end;
write('максимальный элемент массива ==> ',max);
writeln();

if max mod 2 = 1 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =1 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

sum:=0;
if max mod 2 = 0 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =0 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;

end.

2EA(17), где (17) - основание стстемы счисления

Объяснение:

В скобках: (20); (10); (17) указаны основания систем счисления.

1. Переведём число 216 в десятичную систему:

216(20)=2 ∙ 20^2 + 1 ∙ 20^1 + 6 ∙ 20^0 = 2 ∙ 400 + 1 ∙ 20 + 6 ∙ 1 = 800 + 20 + 6 = 826(10)

Таким образом:

216(20) = 826(10)

2. Полученное число 826 переведем из десятичной системы счисления в 17тиричную. Для этого, осуществим последовательное деление на 17, до тех пор пока остаток не будет меньше чем 17.

826÷17=48(ост=А)

48÷17=2(ост=Е)

2÷17=0(ост=2)

Полученные остатки записываем в обратном порядке, таким образом:

826(10)=2EA(17)

ответ: 216(20) = 2EA(17).