Sin x умножить на sin х= sin x прибавить к sin х=

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.

Проверить лежит ли прямая (x-1)  /  2=(y+3)/ (-1)=(z+2)  /  5на плоскости 4x+3y+z+3=0 . n(4; 3; 1) → нормальный вектор плоскости  ;   s(2; -1;   -5)  →направляющий вектор прямой    ;   m₀(1; -3; -2) _произвольная точка на прямой. составим скалярное произведение : n. s =4*2+3*(-1)+1*(-5) =0   ⇒  n  ⊥  s , т.е.  прямая параллельно плоскости  или лежит на ней,  но    точка  m₀(1; -3; -2)  не  лежит на плоскости,  действительно     4*1+3*(-3)++1*(-5)+3  ≠0   (не удовл.   прямая не лежит   на плоскости.