Предмет: Информатика,
автор: GreenCatAnn
Дан массив целых чисел (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.
Интересные вопросы
Предмет: Химия,
автор: diana10183
Предмет: Математика,
автор: irinasepelevskaa
Предмет: География,
автор: nveronikaa
Предмет: Математика,
автор: 20anel04
Предмет: Математика,
автор: vladkravchenko21