• Дана последовательность из N чисел.Написать программу которая подсчитывает количество отрицательных чисел в последовательности.

Ответы 1

  • var a,s,i,n:integer;begin;randomize;readln(n);writeln('False array:');for i:=1 to n dobegin;s:=random(-10,10);writeln(s);if s<0 then inc(a);end;writeln('Result:',a);end.
    • Автор:

      antonio
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years