можете делается это быстро(я смогла сделать только первые 4 задания) в остальных вообще не уверена
262
326
Ответы на вопрос:
Const n = 5; var a: array [1..n] of integer; i,s: integer; begin randomize; s: =0; for i: =1 to n do begin a[i]: =random(61)-30; if (a[i]< 0) and (a[i] mod 2 < > 0) then s: =s+a[i]; end; writeln(s); readln; end.
Популярно: Информатика
-
Олька182415.05.2023 10:14
-
Dashamudrik12322.04.2020 23:07
-
Zver777713.02.2022 07:19
-
Andrey34656354504.11.2021 16:58
-
dfyz229.03.2021 01:36
-
мозг30201.03.2020 13:08
-
Andry21120818.10.2022 21:51
-
antonlutsenko128.04.2021 00:16
-
tatanavolosnova105.12.2020 11:46
-
мугамбе01.10.2020 07:13