• Помогите пожалуйста с паскалем

    1) Заполните массив А первыми N натуральными числами, начиная с X (x ввести с клавиатуры)

    2) Заполнить массив A первыми N натуральными числами Фибоначчи. Первые два числа Фибоначчи равны единице, а каждое последующее вычисляется как сумма всех предыдущих.

Ответы 1

  • PascalABC.NET 3.4.2, сборка 1880 от 18.11.2018Внимание! Если программа не работает, обновите версию!

    begin

     var (x,n):=ReadInteger2('Введите x и n:');

     var a:=x.To(x+n-1).ToArray;

     a.Println;

     // фибоначчи

     a:=ArrGen(n,1,1,(i,j)->i+j);

     a.Println

    end.

  • Добавить свой ответ

Войти через Google

или

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

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

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