B A & ByA & B
Количество логических переменных:
Порядок выполнения логических операций:
A & By A & B
A
B
A
A & B
Ā & B A & B vĀ & B​

#include <iostream>

#include <vector>

using namespace std;

int f(vector<int> &u){

   int k = 1;

   bool has_negative = false;

   for(auto &i : u){

       if(i < 0){

           k *= i;

           has_negative = true;

       }

   }

   return k * has_negative;

}

signed main(){

   const int n = 5;

   vector<vector<int>> a(n, vector<int> (n));

   for(int i = 0; i < n; i++)

       for(int j = 0; j < n; j++)

           cin >> a[i][j];

   for(int i = 0; i < n; i++)

       cout << "Product of negatives in " << i + 1 << " line is " << f(a[i]) << "\n";

}

{Даны вещественные числа a,b,c. Определите, существует ли треугольник со сторонами a,b,c?}
var a,b,c:real;
begin
  writeln('введите стороны треугольника');
  readln(a, b, c);
  if (a+b>c) and (a+C>b) and (b+c>a) then  writeln('треугольник существует')
  else   writeln('треугольник не существует');
end.

{ Дано целое положительное число. Определите, оканчивается ли оно цифрой 7}
var
  N:integer;
begin
  writeln('введите число');
  readln(N);
  if n mod 10= 7 then
    writeln('оканчивается  цифрой 7')
   else    writeln( 'не оканчивается цифрой 7');
end.