21,51,81
Можешь отметить мой ответ лучшим
===== PascalABC.NET ======
begin
Range(1,100).Where(p -> (p mod 10 = 1) and (p mod 3 = 0)).Print
end.
21,51,81
Можешь отметить мой ответ лучшим
===== PascalABC.NET ======
begin
Range(1,100).Where(p -> (p mod 10 = 1) and (p mod 3 = 0)).Print
end.