Заполните массив согласно условию: если индекс элемента массива (i) нечетный, то значение элемента должно находится по формуле i*2+1, а если четный, то значение элемента равно 1. Вывести массив на экранах.
Сделать в Паскале. Информатика, 9 класс. Заранее спасибо.
Сделать в Паскале. Информатика, 9 класс. Заранее спасибо.
More Questions From This User See All
Answers & Comments
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
Внимание! Если программа не работает, обновите версию!
begin
var n := ReadInteger('Количество элементов в массиве:');
var a := ArrGen(n, i -> i.IsEven ? 2 * i + 3 : 1);
a.Println
end.
Количество элементов в массиве: 13
3 1 7 1 11 1 15 1 19 1 23 1 27