Последовательно вводятся N целых чисел. Определить, каких среди них чисел больше:...

Question

Последовательно
вводятся N целых чисел. Определить, каких среди них чисел
больше: положительных или отрицатель­ных.

Нужно построить блок-схему, заранее спасибо

Comments

ЗАДАЧА НА ЦИКЛИЧЕСКИЕ АЛГОРИТМЫ С ИЗВЕСТНЫМ КОЛИЧЕСТВОМ ПОВТОРЕНИЙ

Answer 1

Const
    N = 10; //твое число N
var
    i,c,nc,X: integer;
begin
for i:=1 to N do
begin
    READLN(X);
    if(X >= 0) then inc(c)
    else inc(nc);
end;
  
if (c > nc) then Writeln('четных больше')
else
begin
    if(c < nc) then Writeln('нечетных больше')
    else if(c = nc) then writeln('кол-во четных и нечетных чисел равно');
end;
end.  

Comments

а как мне это перевести в блок-схемы?