Сформировать массив из n случайных чисел от 0 до 86. найти сумму чисел кратных 3.

dulikosha20051 dulikosha20051    2   27.08.2019 20:10    14

Ответы
dashakalita dashakalita  05.10.2020 23:22
//PascalABC.Net 3.2 сборка 1318

begin
  var ar:=ArrRandomInteger(ReadInteger(),0,86).Println;
  write(ar.Where(x -> x mod 3=0).sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика