Дана последовательность n вещественных чисел определить количество отрицательных чисел в этой последовательности
147
188
Ответы на вопрос:
Program z1; var a,i,otr: integer; b: array [1..100] of integer; begin read(a); for i: =1 to a do read(b[i]); otr: =0; for i: =1 to a do if b[i]< =0 then inc(otr); writeln('количество отрицательных ',otr); end.
Популярно: Информатика
-
sukhovershaya18.03.2023 21:01
-
katiapopovici11.03.2022 08:52
-
Яяяяя1111111126.06.2020 13:00
-
Черныйангел0108.05.2022 08:45
-
padpirigov012.02.2020 15:06
-
Verra99029.05.2023 18:43
-
Ритааааааа12.01.2022 11:51
-
Aki051028.12.2021 02:28
-
ugifhuf03.11.2022 18:18
-
rjulia06419.10.2021 22:23