Написать две программы на паскале.

1. Массив заполнен случайными величинами в диапазоне от -30 до 29 и состоит из N элементов. Подсчитать сколько в нём отрицательных, положительных и нулевых элементов.
2. Задана последовательность из N целых натуральных чисел случайной величиной. Вычислить среднее арифметическое только тех элементов массива, порядковые номера которых совпадают со значением этого элемента.

a)

Переводим 91 в двоичную систему счисления

91/2=45 ост 1

45/2=22 ост 1

22/2=11 ост 0

11/2=5 ост 1

5/2=2 ост 1

2/2=1 ост 0

записываем  получившиеся 1 и 0 в обратном порядке получаем:

91= 1011011 в двоичной СС, т.к. ячейка 8-ми разрядная то дописываем вперед незначащий 0

ответ:01011011

Б) -74

сначала переводим число 74 в двоичную систему счисления (как и в примере делением на 2) получим 1001010

дополняем слева 0 для 8-разрядной ячейки 01001010

т.к. число отрицательное меняем 1 на 0 и 0 на 1, получаем 10110101

и прибавляем 1 ко всему числу чтобы получить знак - получаем 10110110

ответ: 10110110

в) 68

Как и в первом примере переводим в двоичную систему счисления делением на 2 и дописываем слева незначащий 0

ответ: 01000100

г) -123

сначала переводим число 123 в двоичную систему счисления делением на 2 получим 1111011

дополняем слева 0 для 8-разрядной ячейки 01111011

т.к. число отрицательное меняем 1 на 0 и 0 на 1, получаем 10000100

и прибавляем 1 ко всему числу чтобы получить знак - получаем   10000101

ответ: 10000101

Объяснение:

Язык не был указан, так что пишу на С++:

1)

#include <iostream>

using namespace std;

int main()

{

   int buf, quantity = 0;

   cin >> buf;

   int sum = 0;

   while (buf != 0) {

       ++quantity;

       sum += buf;

       cin >> buf;

   }

   cout << "Sum: " << sum << "\nAverage: " << sum / quantity;

}

2)

#include <iostream>

using namespace std;

int main()

{

   int buf;

   cin >> buf;

   int max_num = buf;

   while (buf != 0) {

       if (max_num < buf) {

           max_num = buf;

       }

       cin >> buf;

   }

   cout << "Max: " << max_num;

}