Заполнить массив числами по правилу: a[i]=i*3+2*a[i-1]. 1-ый элемент массива равен 10.

Заполнить массив числами по правилу: a[i]=i*3+2*a[i-1]. 1-ый элемент массива равен 10.

Задать свой вопрос
1 ответ

program raf105;

var a:array[1..15] of integer;

i:integer;

begin

a[1]:=10;

writeln('[1] ',a[1]);

for i:=2 to 15 do

begin

 a[i]:=i*3+2*a[i-1];

 writeln('[',i,'] ',a[i]);

end;

end.

Язык программирования  PascalABC

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


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

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

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

Войти на сайт