Привидете 10 примеров для
not, or, and.

1)
 const     k = 15; 
  var 
     a : array [1..k] of integer; 
     s : real; 
      i : integer; 
begin 
 randomize; 
 s := 0; 
for i := 1 to k do       //Обработка массива чаще всего 
  begin                      //осуществляется в цикле
    a[i] := random(21);         //Формирование
    s := s + a[i];                      //Подсчет суммы элементов
end; 
 s := s / k;                              //Среднее арифметическое (сумма/кол - во)
writeln (s:3:3); 
end.

3)  const     n = 5; 
       var 
           a : array [1..n] of integer; 
            i,k : integer; 
 begin 
k := 0;   
  for i := 1 to n do   
         begin     
  readln (a[i]);             //Считываем элемент
   if a[i] < 0 then          //Если элемент меньше нуля
     k := k +1;                  //счетчик +1
           end;
   writeln (k);
  end.

Код на C++:

#include <iostream>

using namespace std;

int main()

{

   setlocale(LC_ALL, "rus");

   int f1 = 0;

   int f2 = 1;

   int f3 = 1;

   int A, count = 0;

   do

   {

       cin >> A;

   } while (A < 2 || A > 2 * pow(10, 9));

       

   while (true)

   {

       count++;

       if (f3 == A)

       {

           cout << count << endl;

           break;

       }

       else if (f3 != A && f3 > A)

       {

           cout << -1 << endl;

           break;

       }

       f3 = f1 + f2;

       f1 = f2;

       f2 = f3;

   };

   

   return 0;

}

Объяснение: