Сформируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента которого составлены по следующему правилу:
1-й равен текущему индексу, увеличенному на 2;

2-й равен целой части от деления случайного числа на предыдущий элемент;

3-й равен сумме двух предыдущих элементов.

Ответ

Автор - BobbyFresnel

===== PascalABC.NET =====

begin

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

for var i := 0 to 2 do

begin

var j := 3 * i + 1;

a[j] := j + 2;

a[j + 1] := Random(50) mod a[j];

a[j + 2] := a[j] + a[ j + 1];

Print(a[j], a[j + 1], a[j + 2])

end

end.

Предыдущий вопрос Следующий вопрос

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.