ПАСКАЛЬ!!. Известно, что первые два элемента массива равны a и b. А каждый следующий элемент равен сумме значений всех предыдущих элементов и собственного номера (нумерация элементов массива начинается с единицы). Заполните мас...
ПАСКАЛЬ!!. Известно, что первые два элемента массива равны a и b. А каждый следующий элемент равен сумме значений всех предыдущих элементов и собственного номера (нумерация элементов массива начинается с единицы). Заполните массив из n элементов, используя этот принцип и выведите значения элементов массива в обратном порядке.
Формат входных данных
Целые положительное число n (2
Целые числа a,b (-50 < a,b < 50)
Формат выходных данных
Строка, содержащая элементы искомого массива в обратном порядке, записанные через пробел
Гость
Ответ(ы) на вопрос:
Гостьconst n=10;
var ar:array[1..n] of integer;
a,b,i,s:integer;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
ar[1]:=a; ar[2]:=b; s:=a+b;
for i:=3 to n do
begin
ar[i]:=s+i;
s:=s+ar[i];
end;
for i:=1 to n do write(ar[i],' ');
writeln;
end.
Пример:
a = 2
b = 3
2 3 8 17 35 71 143 287 575 1151
Не нашли ответ?
Похожие вопросы