Дан линейный массив a[1..n], содержащий целые числа. - вопрос №96050851 от 140219801 20.02.2023 16:55

Question

Информатика: Дан линейный массив a[1..n], содержащий целые числа. преобразовать элементы массива по следующему правилу: если элемент четный, прибавить к нему 1, если нечетный – умножить на два.

140219801 · Answer

PascalABC.NET 3.4.2, сборка 1887 от 30.11.2018Внимание! Если программа не работает, обновите версию!

begin

var a := ArrRandom(ReadInteger('n='), -50, 50);

a.Println;

a.Transform(t -> t.IsEven ? t + 1 : t * 2);

a.Println

end.

Дан линейный массив a[1..n], содержащий целые числа. преобразовать элементы массива по следующему пр