profile
Опубликовано 6 лет назад по предмету Информатика от kotelnikov45

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

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


  1. Ответ
    Ответ дан NStone
    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.  

    1. Ответ
      Ответ дан kotelnikov45
      а как мне это перевести в блок-схемы?
Самые новые вопросы