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

Question

Информатика

Аня

16 мая, 16:23

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

+1

Ответы (1)

Знаете ответ?

Нелли · 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.