Ответы на вопрос:
Var i,s: integer; mas : array [1..20] of integer; begin randomize ; for i: =1 to 20 do mas[i]: =random (100); s: =0; for i: =1 to 20 do if mas[i] mod 5 = 0 then s: =s+mas[i]; writeln('sum',s); end.
Популярно: Информатика
-
Грамотейка128.08.2020 06:15
-
alpet0317.06.2023 20:52
-
Goodsteve3127.08.2022 07:58
-
бернер23.03.2023 06:22
-
Хажижа16.03.2023 09:33
-
Bill54211.06.2023 16:02
-
irror40405.01.2021 19:55
-
vorwq08oz21jg23.05.2021 19:39
-
AKA111117322.02.2021 00:52
-
Катюха123Печенька14.07.2020 22:10