В массиве все элементы больше 10 и меньше 20 заменить на первый элемент массива
В массиве все элементы >10 и <20 заменить на первый элемент массива
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),1,30); a.Println;
var a1:=a[0];
a.Transform(x->((x>10) and (x<20))?a1:x); a.Println;
end.
Пример
n= 15
8 6 15 29 11 20 11 13 19 6 1 10 18 26 19
8 6 8 29 8 20 8 8 8 6 1 10 8 26 8
Не нашли ответ?
Похожие вопросы