Ответы
Ответ дал:
0
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!
begin
Range(100,999).Where(t->t.ToString.Contains('3')).Count.Println
end.
Результат
252
Внимание! Если программа не работает, обновите версию!
begin
Range(100,999).Where(t->t.ToString.Contains('3')).Count.Println
end.
Результат
252
Аноним:
можно через цикл for?
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад