Ответы на вопрос:
const n = 3; var i, a, count, s: integer; begin for i : = 1 to n do begin readln(a); if(a < 0) then begin s : = s + a; inc(count); end; end; writeln(s/count); end.
Популярно: Информатика
-
Loi0023.04.2023 06:38
-
лера223815.04.2021 00:49
-
Kiska8915.09.2022 18:36
-
orororoyowf77q03.08.2022 01:48
-
145milana03.07.2020 06:37
-
emy251218.10.2020 09:26
-
виолетта43029.09.2020 07:30
-
Ega12925.06.2023 04:25
-
alixegp073ii29.09.2022 13:29
-
Tahir35311.06.2021 12:20