Отметьте верные утверждения:
1. отрицательные числа можно представить только в знаковом виде.
2. для положительных целых чисел можно использовать только беззнаковое представление.
3. при представлении со знаком самый младший(правый) разряд отводится под знак числа.
4. при беззнаковом представлении все разряды ячейки отводятся под само число.

PROGRAM ThreeSequences(INPUT, OUTPUT);
VAR
 Number: ARRAY[1 .. 3, 1 .. 10] OF INTEGER;
 ArithmeticAverage: ARRAY[1 .. 3] OF INTEGER;
 I, J: INTEGER;  
BEGIN {ThreeSequences}
 Randomize;
 {Генерирует 3 последовательности по 10 случайных чисел}
 FOR I := 1 TO 3
 DO
   FOR J := 1 TO 10
   DO
     Number[I][J] := Random(10) + 1;
 {Выводит последовательности и считает среднее арифметическое}
 FOR I := 1 TO 3
 DO
   BEGIN
     WRITE('Sequences: ');
     ArithmeticAverage[I] := 0;
     FOR J := 1 TO 10
     DO
       BEGIN
         WRITE(Number[I][J]:3);
         {Складывает все числа последовательности}
         ArithmeticAverage[I] := ArithmeticAverage[I] + Number[I][J];
       END;
     WRITELN;
     {Делит на количество чисел последовательности}
     ArithmeticAverage[I] := ArithmeticAverage[I] DIV J;
     WRITELN('ArithmeticAverage: ', ArithmeticAverage[I]);
   END;
END. {ThreeSequences}

Смотря для какого тебе языка надо, вот для VisualBasic

Sub Neskolko_Chisel

Dim Sum, i, a, N As Integer

N = InputBox("Введите количество чисел")

For i = 1 to N

a = InputBox("Введите число")

Sum = Sum + a

Next i

End Sub

вот для с++

#include <iostream>
#include <conio.h>
using namespace std;

int main()
{
setlocale(LC_ALL, "Russian");

int a, N, Sum, i;
Sum = 0;
N = 0;
a= 0;
cout << "Введите количество чисел! ";
cin >> N;

for (i = 1; i <= N; i++)
{
cout << "Введите число!" ;
cin >> a;
Sum = Sum + a;
}
cout << Sum;

_getch();
}