• Помогите пожалуста
    1.В последовательности чисел натуральных найти количество чисел кратных трем
    2.В последовательности натуральных чисел найти четные числа заканчиваются на 4

Ответы 2

  • efer
  • 1) begin  var a := ArrRandom(20, 1, 100);  a.Println();  writeln(a.Where(x -> x mod 3 = 0).Count);end.2)begin  var a := ArrRandom(20, 1, 100);  a.Println();  writeln(a.Where(x -> (x mod 2 = 0) and (x mod 10 = 4)));end.
    • Автор:

      lady60
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years