Паскаль!!! Создать целочисленный массив a размера n(amp;lt;10) и заполнить его с

Паскаль!!!
Создать целочисленный массив a размера n(lt;10) и заполнить его с клавиатуры. Вывести на экран введенный массив и результат суммы первого и последнего элемента массива.

Задать свой вопрос
1 ответ
Var
A:array[1..10] of integer;
n:integer;
Begin
Write('n = ');Readln(n);
For n:= 1 to n do
    Read(A[n]);
Write('Массив: ');
For n:= 1 to n do
    Write(A[n],' ');
WriteLn;
WriteLn('Сумма первого и заключительного элемента: ',A[1]+A[n]);
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт