Сформировать массив из 10 чисел по следующим правилам: первый элемент равен 3, второй 4, а каждый следующий равен среднему арифметическому двух предыдущих написать задачку)

На Паскале

var

a:array[1 ... 10] of real;

i:integer;

begin

a[1]:=3;

a[2]:=4;

for i:=3 to 10 do

a[i]: = (a[i-2]+a[i-1]) / 2;

for i:=1 to 10 do

write (a[i],' ') ;

end.

На C++

#include

void main ()

{

float a[10] = { 3,4 };

for (int i = 2; i < 10; i++)

a[i] = (a[i - 2] + a[i - 1]) / 2;

for (int i = 0; i < 10; i++)

std::cout << a[i] << '/t';

system ("pause") ;

}