Паскаль (Pascal ABC) Задача.Массивы. Даны три целых числа: N (> 2), A и B. Сформировать...

Question

Паскаль (Pascal ABC) Задача.Массивы. Даны три целых числа: N (> 2), A и B. Сформировать целочисленный массив размера N, каждый элемент которого рассчитывается по формуле: (А+В)*I, где I – индекс элемента массива. Вывести полученный массив на экран, расположив каждый элемент в отдельной строке

Answer 1

Var
   ar:array of integer;
  n,i,a,b:integer;
begin
readln(n,a,b);
setlength(ar,n);
for i:=1 to n-1 do begin
  ar[i]:=(a+b)*i;
  writeln(ar[i]);
 end;
end.