Регистрация
Войти
Стать экспертом Правила
Информатика

Написать программу, которая генерирует 10 четных чисел и сортирует их по возрастанию.Промежуток чисел - до 100

ОТВЕТЫ



begin
  var L:=SeqRandom(10,1,99).Where(t->t.IsEven).ToList;
  while L.Count<10 do begin
    var k:=Random(1,99);
    if k.IsEven then L.Add(k)
    end;
  L.Println.OrderBy(t->t).Println
end.


48 12 12 98 62 14 62 8 22 24
8 12 12 14 22 24 48 62 62 98
263
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам