Даны 3 нечетных числа 3,5,1.результат является среднее арифметическое данных чисел.определите тип входных и выходных данных cоставить по таблице: переменные значения тип данных обоснование входные выходные 40 !

Укажите номер наименьшего из трех числел

1. 101010²

2.2F [16]

3. 51[8]

Укажите, в каких системах счисления возможна следующая запись числа :121090

1. В десятичной

2. В шестнадцатеричной.

3. В восьмеричной.

4. В двоичной.

Установите соответствие.

110. 1.7

001. 2.5

101. 3.3

010. 4. 1

111. 5.2

100. 6.4

011. 7.6

Укажите, в каких системах счисления невозможна следующая запись числа: 101088

1. В десятичной

2. В двоичной

3. В восмеричной

4. В шестнадцатеричной

Запишите десятичный эквивалент восьмеричной числа 55[8]

Как будет записано 25 в восьмеричной системе счисления

Объяснение:хах

Заполнение с клавиатуры:

Var
   A:array[1..5] of integer;
   i,O,P:integer;
Begin
Write('Введите массив A(5): ');
O:=0;
P:=0;
For i:= 1 to 5 do
    Begin
    Read(A[i]);
    if A[i] < 0 then O:=O+1
    else if A[i] > 0 then P:=P+1;
    End;
WriteLn('Количество отрицательных: ',O);
WriteLn('Количество положительных: ',P);
End.

Заполнение случайными числами:

Const
   N = 5;
Var
   A:array[1..N] of integer;
   i,O,P:integer;
Begin
Randomize;
Write('Введите массив A(5):');
O:=0;
P:=0;
For i:= 1 to N do
    Begin
    A[i]:=random(2*N+1)-N;
    Write(' ',A[i]);
    if A[i] < 0 then O:=O+1
    else if A[i] > 0 then P:=P+1;
    End;
WriteLn;
WriteLn('Количество отрицательных: ',O);
WriteLn('Количество положительных: ',P);
End.