Подсчитать количество вводимых положительных и отрицательных чисел. операцию ввода повторить 12 раз. turbo poscal

Var pc, oc, x, i : longint;
begin
oc := 0; pc := 0;
for i := 1 to 12 do begin
readln(x);
if (x < 0) then oc := oc + 1
else pc := pc + 1;
end;
writeln('Положительные:'); writeln(pc); writeln('Отрицательные:'); writeln(oc);
readln(x);
end.

P.S. 0 считается положительным в этой программе

Человек. Тут все просто. :)

Объяснение:

"А" меньше 0?

ответ: нет, она больше 0. (Т.е.: А=8)

Значит ты идешь вниз по стрелочке "нет".

Дальше формула:

В=А-В

Значит: В=8-2=6

ответ: В=6

Тоже самое делаем с буквой "А":

А=А-2

Значит: А=8-2=6

ответ: А=6

ответ: А=6; В=6

Теперь мы это все повторяем в том же духе, только до того момента пока значение буквы "А" не станет меньше "0".

Значит повторяем:

"А" меньше 0?

ответ: нет, она больше 0. (Т.е.: А=6)

Значит ты идешь вниз по стрелочке "нет".

Дальше формула:

В=А-В

Значит: В=6-6=0

ответ: В=0

Тоже самое делаем с буквой "А":

А=А-2

Значит: А=6-2=4

ответ: А=4

ответ: А=4; В=0

"А" меньше 0?

ответ: нет, она больше 0. (Т.е.: А=4)

Значит ты идешь вниз по стрелочке "нет".

Дальше формула:

В=А-В

Значит: В=4-0=4

ответ: В=4

Тоже самое делаем с буквой "А":

А=А-2

Значит: А=4-2=2

ответ: А=2

ответ: А=2; В=4

"А" меньше 0?

ответ: нет, она больше 0. (Т.е.: А=2)

Значит ты идешь вниз по стрелочке "нет".

Дальше формула:

В=А-В

Значит: В=2-0=2

ответ: В=2

Тоже самое делаем с буквой "А":

А=А-2

Значит: А=2-2=0

ответ: А=0

ответ: А=0; В=2

"А" меньше 0?

ответ: нет, она на равне с 0. (Т.е.: А=0)

Значит ты идешь вниз по стрелочке "нет".

Дальше формула:

В=А-В

Значит: В=0-0=0

ответ: В=0

Тоже самое делаем с буквой "А":

А=А-2

Значит: А=0-2=-2

ответ: А=-2

ответ: А=-2; В=0Значит мы условия выполнили! "А" меньше 0.Удачи!

1.объединяет компьютеры, установленные в одном помещении или в одном здании.

2.это периферийное устройство компьютера, непосредственно взаимодействующее со средой передачи данных, которая прямо или через другое коммуникационное оборудование связывает его с другими компьютерами. ... Получение доступа к среде передачи данных.

3.Зависит только от сети.

4.Глобальные сети – обеспечивают соединения более 1000 км. Они объединяют области и даже страны. Самой известной такой сетью, разумеется, является интернет. Региональные сети – протяженность которых составляет от 10 до 100 км. Региональной сетью может быть как город, так и целый район.

5.проводные линии связи без изолирующих и экранирующих оплеток;

кабельные, где для передачи сигналов используются такие линии связи как кабели "витая пара", коаксиальные кабели или оптоволоконные кабели;

беспроводные (радиоканалы наземной и спутниковой связи), использующие для передачи сигналов электромагнитные волны, которые распространяются по эфиру.

Объяснение: