Распределение предприятий отрасли по объему полученной за год прибыли.
Прибыль за год в млн. руб.
123,3
134,5
173,5
234,1
324,1
432,5
154
366
Ответы на вопрос:
Var a: array[1..5] of integer; i: integer; begin for i: =1 to 5 do readln(a[i]); for i: =1 to 5 do if a[i] < 0 then write(a[i],' '); writeln('- отрицательные'); readln; end.так?
Популярно: Другие предметы
-
bolgarevaua24.08.2021 15:50
-
LianaTesten20061517.02.2021 04:52
-
romanenkoanna6604.03.2023 22:24
-
Cookiefluffy150023.04.2023 19:07
-
annasefershaeva08.12.2021 08:57
-
irina89512.05.2022 04:49
-
cross66602.10.2020 02:21
-
Алая5кровь16.01.2023 03:07
-
Vampire123405.02.2021 19:44
-
jhgtreedhhuuu17.08.2020 16:44