Напишите программу, реализующую заполнение 25 числами массива B по формуле и вывод их **...

0 голосов
42 просмотров

Напишите программу, реализующую заполнение 25 числами массива B по формуле и вывод их на экран в строку по формату: целая часть – 9 позиций, дробная – 3 позиции.
Формула: элемент массива равен сумме двух предыдущих элементов, деленной на номер текущего элемента, т.е. третий элемент равен (первому + второму)/3(индекс третьего) и т.д.
Значения первого и второго элемента: B[1]:=3; B[2]:=6;


Информатика (64 баллов) | 42 просмотров
Дан 1 ответ
0 голосов

Var B: array[1..25] of real; sr:real;i,n: integer;beginB[1]:=3; B[2]:=6; writeln('Исходный массив');for i:=3 to 25 do beginB[i]:=(B[i-2]+B[i-1])/i;write(B[i]:11:3);end;end.

(6.5k баллов)