Синформатикой) 1) дан массив от 0 до 100. найти минимальный нечётный элемент массива. 2) дан массив от -100 до 100 написать количество положительных и максимальный элемент массива. всё нужно по паскалю, )

2)
USES CRT;
VAR A:array[0..200] of integer;   
       i,max,s:integer;
BEGIN
CLRSCR;
Randomize;   
   Writeln('Дан массив:'); 
   for i:=0 to 200 do     
      begin         
         A[i]:=-100+random(150);         
         Write(A[i],'   ');     
      end;

       s:=0;   
       max:=A[0];

       for i:=0 to 200 do     
          begin         
             if A[i] > max then max:=A[i];         
             if A[i]>=0 then s:=s+1;     
          end;   
       
        Writeln;   
        Writeln('Максимальный элемент массива  = ', max);   
        Writeln('Кол-во положительных элементов = ',s);
READLN;
END.

#include <iostream>

#include <iomanip>

#include <ctime>

using namespace std;

int main()

{

   setlocale(LC_ALL, "russian");

   int max = 0;

   int min = 0;

   int Indexmin2;

   int Indexmax = 0, Indexmin = 0;

   const int N = 10;

   int array[N];

   int i;

   for (i = 0; i < N; i++)

   {

       cin >> array[i];

   }

   cout << endl;

   cout << " Результат до перестановки " << endl;

   for (i = 0; i < N; i++)

   {

       cout << setw(5) << array[i];

   }

   cout << endl;

   cout << " Результат после перестановки " << endl;

   for (i = 0; i < N; i++)

   {

       if (array[i] > max)

       {

           max = array[i];

           Indexmax = i;

       }

       if (array[i] < min)

       {

           min = array[i];

           Indexmin = i;

       }

   }

   Indexmin2 = array[Indexmin];

   array[Indexmin] = array[Indexmax];

   array[Indexmax] = Indexmin2;

   for (i = 0; i < N; i++)

   {

       cout << setw(5) << array[i];

   }

   cout << endl;

   cout << "Максимальное: " << max << endl;

   cout << "Минимальное: " << min << endl;

   cout << "Максимальный индекс: " << Indexmax << endl;

   cout << "Минимальный индекс: " << Indexmin << endl;

}

1)в виде логических нулей и единиц (битов), а также их групп (байтов)

2)могут отличаться типом файлов

3)составленный в определённом порядке перечень каких-нибудь однородных предметов

4)Чтоб создать папку, файл или ярлык, требуется, прежде всего, путем перемещение по папкам и дискам вашего компьютера перейти к папке, в которой вы будете создавать новый объект. После этого нужно вызвать вс меню, щелкнув правой кнопкой мыши на свободном месте в правой части окна проводника, где расположен список содержимого текущей папки. В появившемся меню следует выбрать команду Создать (New). Также можно выбрать команду меню программы Файл * Создать (File), В любом случае на экране появится вс меню с перечнем объектов, которые вы можете создать.

5-е не знаю