• Паскаль.Известно, что первые два элемента массива равны a и b. А каждый следующий элемент равен сумме значений всех предыдущих элементов и собственного номера (нумерация элементов массива начинается с единицы). Заполните массив из n элементов, используя этот принцип и выведите значения элементов массива в обратном порядке.
    Формат входных данных

    Целые положительное число n (2
    Целые числа a,b (-50 < a,b < 50)

    Формат выходных данных

    Строка, содержащая элементы искомого массива в обратном порядке, записанные через пробел

Ответы 1

  • var n, a, b, i, j: integer;   ar: array[1..10000]of integer;  begin   read(n, a, b);   ar[1] := a;   ar[2] := b;   for i := 3 to n do    begin     for j := 1 to i - 1 do     begin       ar[i] := ar[i] + ar[j];     end;     ar[i] := ar[i] + i;   end;   for i := n downto 1 do write(ar[i],' '); end.
    • Автор:

      jordizw29
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years