Ответы на вопрос:
// pascalabc.net 3.3, сборка 1583 от 25.11.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(20,-15,40); a.println(','); var i: =1; while i< =a.length-1 do begin a[i]: =a[0]; i+=2 end; a.println; writeln('элементов, кратных 4: ',a.where(t-> t mod 4=0).count) end. пример -2,-1,14,36,-14,-14,15,15,35,1,-12,-12,-14,18,-11,32,-11,-5,28,-13 -2 -2 14 -2 -14 -2 15 -2 35 -2 -12 -2 -14 -2 -11 -2 -11 -2 28 -2 элементов, кратных 4: 2
Популярно: Информатика
-
ksuhamalinovskaj24.02.2021 10:48
-
SuperCatYT15.02.2023 10:39
-
ValeriaChernysheva18.11.2022 00:19
-
marinadm988919.09.2021 21:04
-
sirozazuruhin01.03.2020 16:55
-
YanaDovgik26.03.2020 06:27
-
Kisyshka25.09.2022 16:34
-
akyjla55112.03.2020 21:16
-
Умник199733713.09.2022 05:54
-
sawa198914.01.2020 19:22