Дан массив целых чисел (n=12), заполненный случайным образом числами из промежутка [-10,60].
− удалить из него все элементы, в которых последняя цифра четная, а само число делится на нее.
Ответы
Ответ дал:
0
//PascalABC.NET 3.1 сборка 1239
begin
var a := ArrRandomInteger(12, -10, 60);
a.Println;
a.Where(x -> not ((x mod 2 = 0) and (x mod 10 <> 0) and (x mod (x mod 10) = 0))).Println;
end.
begin
var a := ArrRandomInteger(12, -10, 60);
a.Println;
a.Where(x -> not ((x mod 2 = 0) and (x mod 10 <> 0) and (x mod (x mod 10) = 0))).Println;
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
10 лет назад