Решите по информатике в программе паскаль, . в массиве а(5) посчитать кол-во положительных и кол-во отрицательных чисел.
Riddlemethis
1
30.03.2019 05:00
1
Другие вопросы по теме Информатика
Лика113998
10.08.2019 15:20
shiryaevkirill
10.08.2019 15:20
Tittans16
10.08.2019 15:20
кіндра
10.08.2019 15:20
1207malinap0c23p
07.04.2020 13:29
leonru1
12.02.2021 08:28
Pomogashka2002
12.02.2021 08:23
Машkа
14.05.2019 11:54
Популярные вопросы
- 2*(a + 2)-10=6*(3-a) 3(2y-1)+6(3y-4)=83+5(y-3)...
3 - хотя бы на 1 вопрос,и кратко ...
1 - Напишите маленький рассказ про 1 лондонскую достопримечательность на (чтобы...
1 - Термістор, опір якого при кімнатній температурі дорівнює 20ком, увімкнули...
1 - Написать сочинение на тему: могут ли вещи оказывать огромное влияние на...
2 - Это просто супер пупер ! какой новый жанр оперы появился в творчестве мусоргского?...
1 - Требуется переплавить в один шар два чугунних шара диаметры которых 25см...
3 - Статистика! , на фото имеются следующие данные о среднем размере товарных...
2 - На утюге написано 400 вт 220 в. каково сопротивление нагревательного элемента?...
1 - Какой древний написал об убийстве тиберия гракха...
3
var
A : Array [1..5] of Integer;
i, e, k : Integer;
begin
e := 0;
k := 0;
// Здесь задаешь массив
for i := 1 to 5 do
if A[i] >= 0 then inc(e) else inc(k);
Writeln('Положительных ', i)
Writeln('Отрицательных', i)
end.