Нужно написать программу на языке паскаль, для решения этого уравнения..​

Другой перевода из десятичной системы в двоичную: берем число и делим его столбиком на основание системы, в которую переводим. Нацело. Если есть остаток, то его оставляем. А получившееся часное снова делим на основание требуемой системы. И так далее, пока часное не перестанет делится нацело. А чтобы записать число в требуемой системе, записываем последнее часное, а потом все остатки, начиная с последнего. (кстати, по аналогии можно переводить в любую другую систему).

 

173|   2

172   86|  2

   1   86   43|  2

          0   42   21|  2

                1   20   10|  2

                       1   10   5|  2

                             0    4   2|  2

                                   1   2   1

                                        0

 

 

Итого: в записи 5 единиц.

Задача 1: 1

Задача 2:

begin

s:=0; k:=1;

while k < 11 do  begin

s:=s+k; k:=k+1;

end;

write(s);

end.

Задача 3:

11 10 9 8 7 7 10 11 12 13 14

Задача 4:

const N = 20;

const MAX = 100;

const MIN = -100;

var A: array [1..N] of integer;

var i,s: integer;

begin

randomize();

s:=-1;

writeln('Исходный массив: ');

for i:=1 to N do

 begin

 A[i]:=random(MAX-MIN+1)+MIN;

 if (A[i]>0) and (A[i] mod 5 = 0) then

   begin

   if (s=-1) then s:=A[i]

   else if (A[i]<s) then s:=A[i];

   end;

 write(A[i],' ');

 end;

writeln();

if (s<>-1) then writeln('Минимальное значение среди положительных',

' элементов массива кратных 5: ',s)

else writeln('Не найдено');

end.