Предполагаю 55555 - 29 - Ы мой вариант - немного не логичный с некоторой стороны, но попытаюсь объяснить почему 29: -- О - 16 - 10000 в двоичной системе, если посмотреть, то именно 5 цифр получается, что возможно нам и подходит. Д - 5 - 101 возможно, это потому что две 55, и добавляем единицу в конце Т - 20 - 10100 тут образуются все 5 цифр, и как перед этим (Д - 5), получаем 101 Ч - 26 - 11010 тут просто добавляется 1 в перед и далее 55555, так как с 5555 получили просто впереди 1, то скорее всего, и тут добавляется 1, и получаем число 11101 = 29
Сумма номеров от 1 до 9 равна 45. Сумма от 10 до 19 равна 10 + 45 = 55. Сумма от 20 до 29 равна 2*10 + 45 = 65. Сумма от 30 до 39 равна 3*10 + 45 = 75. ... Сумма от 90 до 99 равна 9*10 + 45 = 135. Сумма всех цифр от 1 до 99 равна 45 + 55 + 65 + ... + 135 = (45 + 135)*10/2 = 180*10/2 = 900 В номерах от 100 до 199 та же сумма цифр 900 + 100*1 = 1000 В номерах от 200 до 209 сумма цифр 2*9 + 45 = 18 + 45 = 63 В номерах от 210 до 212 сумма цифр 2+1+0+2+1+1+2+1+2 = 12 Итого сумма всех цифр 900 + 1000 + 63 + 12 = 1975
const N=20;
var R:array[1..N] of integer;
i,a,b,c,s:integer;
begin
a:=0;
b:=0;
for i:=1 to N do
begin
R[i]:=random(N)-random(N);
write(R[i]:3,'[',i,']');
end;
writeln;
for i:=1 to N do
begin
if a<1 then
begin
if R[i]<0 then
begin
b:=i;
a:=a+1;
end;
end;
end;
a:=0;
c:=0;
for i:=N downto 1 do
begin
if a<1 then
begin
if R[i]<0 then
begin
c:=i;
a:=a+1;
end;
end;
end;
s:=0;
for i:=1 to N do
s:=s+R[i];
writeln('Номер первого отрицательного элемента - ',b);
writeln('Номер последнего отрицательного элемента - ',c);
writeln('Сумма элементов в массиве - ',s);
end.