Помогите пожалуйста с паскалем1) Заполните массив А первыми N естественными числами,

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

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

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

Задать свой вопрос
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)-gt;i+j);

 a.Println

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт