search points attachment profile arrow left arrow right star heart verified symbols equation arrow-down question mark check menu accountancyadministrationagriculturalalgebraallarabicartart_musicbelarusbelarus_altbiologybusinesscatalachemistrychineseeconomicsegzamenglishentrepreneurshipenvironmentethicseuskarafirst_aidfrenchgalegogeographygeologygeometrygermangrammarhealthhistoryindia_langindonesian_langinformaticsitalianjapanesekazachkazach_altkoreanlanguagelatinlawlife_scienceliteraturelogicmathematicsmusicnigerian_langother_languagesotherspedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligionrpa_langrussianrussian_altsciencesecurityskillssocial_sciencesociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation accountancyadministrationagriculturalalgebraall_1arabicartart_music_2belarusbelarus_altbiologybusiness_2catalachemistry_1chineseeconomicsexam_3englishentrepreneurshipenvironment_2ethicseuskarasecurity_1frenchgalegogeography_4geology_4geometrygermangrammarhealthhistoryindia-langindonesian-langinformaticsitalianjapanesekazachAsset 230koreanlanguagelatinlawlife-scienceliteraturelogic_2mathematicsmusicnigerian-langotherlanguagesother_1pedagogicsphilosophyphysical_educationphysicspoliticspsychologyreligion_1rpa-langrussianrussian_altsciencesecurity_3_mskills_1allsocial_science_5_msociologyspanishstatisticstechnologytourismtrafficukrainianukrainian_altukrainian_literaturewos_civilisation

Ответ

Проверено экспертом

Автор - BobbyFresnel

===== PascalABC.NET =====

begin

// 1

var a := ReadArrInteger(10);

a.Transform(p -> 5 * p);

a.Println;

a.Aggregate(BigInteger.One, (u, v) -> u * v).Println;

// 2

var b := ReadArrInteger(6);

b.Count(p -> (p > 0) and p.InRange(1, 9)).Println;

// 3

var c := ReadArrInteger(8);

c.Where(p -> (p mod 10 = 0) and p.InRange(150, 250)).Println

.Sum.Println;

// 4

var d := ReadArrInteger(5);

d.Where(p -> p mod 10 = 4).Min.Println

end.

Ответы и объяснения

По всем вопросам пишите на - vashurokk@rambler.ru
© 2025 Все права защищены