Ответы на вопрос:
Program zadacha; var a: array[1..15] of integer; i,s: integer; begin randomize; s: =0; for i: =1 to 15 do begin a[i]: =random(61)-30; write(a[i],' '); if a[i] mod 5 = 0 then s: =s+a[i]; end; writeln; writeln('s=',s); end.
Популярно: Информатика
-
ElizavetaArtLove1320.12.2021 03:21
-
negricho17.06.2021 15:30
-
Топор22808.11.2022 01:36
-
DiMOn4iK2514.06.2021 06:10
-
aliceBRATSKAIA11.01.2023 09:46
-
uchenik571315.12.2022 21:49
-
julliastripa02.03.2023 17:40
-
wami5628.03.2023 08:39
-
denistim18.08.2020 10:21
-
250alina25025.08.2021 18:02