PascalABC.NET
begin
ArrRandom(50,0,10).Where(x -> x + x <> 10).Print
end.
//Я так понял сумма цифр это например: 1 + 1; 2 + 2; 3 + 3; 4 + 4...Если встречается число 5, то 5 + 5 = 10...мы удаляем 5.
PascalABC.NET
begin
ArrRandom(50,0,10).Where(x -> x + x <> 10).Print
end.
//Я так понял сумма цифр это например: 1 + 1; 2 + 2; 3 + 3; 4 + 4...Если встречается число 5, то 5 + 5 = 10...мы удаляем 5.