Составить программу заполнения массива а[1..10] следующими числами: индекс массива 1 2 3 4 5 6 …
Составить программу заполнения массива а[1..10] следующими числами:
индекс массива 1 2 3 4 5 6 7 8 9 10
значение элемента 1 6 3 12 5 18 7 24 9 30
закономерность- значения элементов с нечетными индексами равны индексу элемента,а значения элементов с четными индексами-утроенному индексу элемента. Срочно надо
индекс массива 1 2 3 4 5 6 7 8 9 10
значение элемента 1 6 3 12 5 18 7 24 9 30
закономерность- значения элементов с нечетными индексами равны индексу элемента,а значения элементов с четными индексами-утроенному индексу элемента. Срочно надо
1 Ответ (-а, -ов)
// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
begin
var a:=SeqGen(10,i->i.IsEven?i+1:3*(i+1)).ToArray; a.Println
end.
Результат
1 6 3 12 5 18 7 24 9 30
begin
var a:=SeqGen(10,i->i.IsEven?i+1:3*(i+1)).ToArray; a.Println
end.
Результат
1 6 3 12 5 18 7 24 9 30