Ответы на вопрос:
// pascalabc.net 3.3, сборка 1549 от 17.10.2017 // внимание! если программа не работает, обновите версию! begin var r: =range(100,1000); writeln('сумма четных: ',r.where(x-> x.iseven).sum); writeln('произведение нечетных: ', r.where(x-> x.isodd).aggregate(biginteger(,y)-> x*y)) end. результат сумма четных: 248050 произведение нечетных: 36966544481545882391823230067805385433230065368829576574915631961875951438749314875520891958773465683198309929571713227368698968335498279329362186811130459340459701708143628528300666430241499963363995156875472920823879073796270530674091365457301367694608396460427864525856348256854709381753098272866558646536629626322781887765489939455189437187612366035802205337138797639784505362746964525946343706655765053639253274426077913592271079783658672906924798929301517243147811305368104203869922649498420017010079861449087671086945458864075701800348571856363660191891005745473487285185093263826285985161291672009840401500648116978749473368664914039649974635642316727953613512087059513022266150683907968562889468475751462634414790601916842157202699257750637933476610759209266207736659346632336154863491811161547515391373090783158239924403943495793328563207072814564054863234093687597907376741512012744430337566475185020879095658879920498365311358232252688878619532793045747038932448911025039177711271956296398164256480905110102487991832871736322981910580412208741937654427051439114361588088330674072568693330290186189385005707253104742148887065855866777951156097027659674751631779798799470881931483745574951171875
Популярно: Информатика
-
Natasatana05.05.2023 21:43
-
arinuhkas06.02.2021 21:10
-
Бегимотик00227.06.2022 16:00
-
Лана20061114.11.2021 09:36
-
gbvf102.01.2022 00:24
-
rufdiana19.01.2020 19:02
-
Raimbek71117.02.2020 01:38
-
KsehiaKomleva12.02.2021 18:06
-
позитив1928.10.2020 17:06
-
denisgulinskii14.05.2022 10:02