Составить программу заполнения одномерного массива, так чтоб его i-ый элемент был

Составить программку наполнения одномерного массива, так чтобы его i-ый элемент был равен a[i]=i*i+10 Паскаль

Задать свой вопрос
Инна
А сколько частей в массиве ?
Надежда Семенюта
Ничего больше не сказано...
2 ответа
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrGen(ReadInteger('n='),i-gt;i*i+10); a.Println
end.

Пример
n= 13
10 11 14 19 26 35 46 59 74 91 110 131 154
Program zap;
var a:array [1..10000] of integer; i,n:integer;
begin 
Writeln('Введите количество частей '); 
Readln(n); 
for i:=1 to N do 
  begin 
   a[i]:=i*i+10;
   Writeln(a[i]) 
  end;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт