Ответы на вопрос:
Var i,p: integer; begin p: =1; for i: =-20 to 30 do if i mod 3 = 0 then p*=i; writeln(p); end.
1) birthday1.asf - 24.12.15 birthday2.asf - 15.07.16 clip_1.mpeg - 24.07.14 clip_2.mov - 24.10.16 clip_3.mov - 01.07.14 family.avi - 12.08.13 friends1.mov - 25.07.14 friends2.mov - 04.01.14 video1.avi - 19.07.14 video2.avi - 21.11.13 video3.wmv - 24.06.14 video4.wmv - 10.07.15 2) birthday2.asf - 15.07.16 clip_1.mpeg - 24.07.14 clip_3.mov - 01.07.14 family.avi - 12.08.13 friends2.mov - 04.01.14 video2.avi - 21.11.13 video4.wmv - 10.07.15 3) family.avi - 12.08.13 video2.avi - 21.11.13 friends2.mov - 04.01.14 clip_3.mov - 01.07.14 clip_1.mpeg - 24.07.14 video4.wmv - 10.07.15 birthday2.asf - 15.07.16 итог : video2.avi - 21.11.13 clip_3.mov - 01.07.14 clip_1.mpeg - 24.07.14 video4.wmv - 10.07.15 birthday2.asf - 15.07.16 ответ: 5
Популярно: Информатика
-
sukalovan026.11.2020 22:06
-
Mazhor112.03.2023 11:32
-
shvartsberg11108.04.2021 10:56
-
aska31120305.10.2022 13:54
-
osipovasashaa17.10.2022 12:34
-
gjgjggfasf20.09.2021 15:16
-
ArturRus200409.03.2023 19:45
-
79854246143TATIANA10.11.2022 17:54
-
Жасмин78712.04.2022 14:44
-
vsevolod201322.04.2020 18:20