Составить программу которая заполняет массив из 10 случайных чисел затем все не четные значения увеличивает в 3 раза а четные заменяет нулями
Составить программу которая заполняет массив из 10 случайных чисел затем все не четные значения увеличивает в 3 раза а четные заменяет нулями
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
var a:=ArrRandom(10,0,90); a.Println;
a:=a.Select(x->x.IsOdd?3*x:0).ToArray; a.Println
end.
Пример
83 16 76 62 53 57 28 24 10 29
249 0 0 0 159 171 0 0 0 87
Не нашли ответ?
Похожие вопросы