Решите уравнение! 8х + 120 - (21х + 12) = 96

8x+120-(21x+12)=96 8x-21x=96-120+12 -13x=-12 x=12/13

var

  n: longint;

  k,sum: integer;

begin

  write ('n = ');

  readln(n);

  k: =0;

  sum: =0;

  while n < > 0 do

    begin

        if (n mod 10) mod 2 = 0 then

          begin

            k: =k+1;

            sum: =sum+(n mod 10);

          end;

        n: =n div 10;

    end;

  writeln ('summa: ',sum);

  writeln ('kol-vo: ',k);

  readln;

end.

дано линейное уравнение:

1+x+1/3 = x-3*x+1/8

приводим подобные слагаемые в левой части ур-ния:

4/3 + x = x-3*x+1/8

приводим подобные слагаемые в правой части ур-ния:

4/3 + x = 1/8 - 2*x

переносим свободные слагаемые (без x)

из левой части в правую, получим:

      29      

x = - -- - 2*x

      24      

переносим слагаемые с неизвестным x

из правой части в левую:

3 x = - 29/24

разделим обе части ур-ния на 3

x = -29/24 / (3)

получим ответ: x = -29/72