Есть ответ 👍

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

168
188
Посмотреть ответы 3

Ответы на вопрос:

helpme177
4,4(31 оценок)

// pascalabc.net 3.3, сборка 1590 от 03.12.2017 // внимание! если программа не работает, обновите версию! begin   var a: =arrgen(readinteger('n='),i-> 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.

Неправильно написан цикл

Объяснение:

синтаксис объявления таков

for i := 1 to n do

       // код вашей программы

от 1 до n делаем такой-то код

В вашем случае for a:=5 begin не указан сколько раз выполнить цикл

если пять раз то for a:=1 to 5 do begin

// код

end;

Популярно: Информатика