Массивы

[Ximer]

Помогите пожалуйста с задачами.
1)Сформируйте и выведите на экран массив из n элементов, где каждый чётный элемент массива равен сумме двух предыдущих, а нечётный - значению текущего индекса, увеличенному на 3.

2)Сформируйте и выведите на экран массив из n элементов, с помощью датчика случайных чисел. Получите новый массив, каждый элемент которого равен соответствующему исходного элемента и его квадрата. В полученном массиве найти максимальный элемент и его номер. Вывести на экран исходные и полученные результаты.

[alex_fcsm]

Ваши наработки? Что не получается?

[Ximer]

Нароботок нет. Не знаю как решать.

[Stilet]

где каждый чётный элемент массива равен двух предыдущих

Это как понимать?

[Cookson]

Наверное, сумме двух предыдущих

[Ximer]

Да сумме извините не дописал.

[антон2]

ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО!!!!
дан линейный массив из N элементов(целых случайных чисел от 1 до 5). заменить группу одинаковых рядом стоящих элементов одним.

[alex_fcsm]

Сообщение от Ximer

Да сумме извините не дописал.

Тогда нужно еще и определить чему будет равен 2-ой элемент(здесь он равен первому)

if (i mod 2=0) and (i>2) then a[i]:=a[i-1]+a[i-2]
   else if i=2 then a[i]:=a[i-1]
     else if i mod 2=1 then a[i]:=i+3;