Паскаль (Pascal ABC) Задача.Массивы. Даны три целых числа: N ( больше 2), A и B. Сформировать целочисленный массив размера N, каждый элемент которого рассчитывается по формуле: (А+В)*I, где I – индекс элемента массива. Вывести...
Паскаль (Pascal ABC) Задача.Массивы. Даны три целых числа: N (> 2), A и B. Сформировать целочисленный массив размера N, каждый элемент которого рассчитывается по формуле: (А+В)*I, где I – индекс элемента массива. Вывести полученный массив на экран, расположив каждый элемент в отдельной строке
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы