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

СРОЧНО!!30 баллов
В паскаль(цикл)
Последовательно вводится N целых чисел.найти количество отрицательных среди них

  1. Ответ
    Ответ дан MagAragorn
    var m:array[1..30] of longint;
    schet1,i:longint;
    begin
    for i:=1 to 30 do
    begin
    read(m[i]);
    if m[i]<0 then 
     inc(schet1);
    end;
    writeln(schet1);
    end.
  2. Ответ
    Ответ дан nikmeln
    Ответ: если я не ошибаюсь, это N деленное на 2
Самые новые вопросы