Сформировать массив из n случайных чисел от 0 до 86. Найти сумму чисел кратных 3.
ilgizulaevich в категроии Информатика, вопрос открыт 03.04.2017 в 20:45
1 ответ
[email protected] , ответ добавлен 03.04.2017 в 21:00
//PascalABC.Net 3.2 сборка 1318
begin
var ar:=ArrRandomInteger(ReadInteger(),0,86).Println;
write(ar.Where(x -> x mod 3=0).sum);
end.
0
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.