• Составить программу и блок - схему к задаче: Вводится последовательность из N целых чисел. Найти сумму отрицательных.Пожалуйста помогите

Ответы 3

  • Спасибо большое))
    • Автор:

      ashlyouw2
    • 6 лет назад
    • 0
  • не за что))
  • program al;var a:array[1..32000] of integer;n,s,i:integer;beginwriteln('n=');readln(n);writeln('vvedite massiv');for i:= 1 to n doreadln(a[i]);s:=0;for i := 1 to n doif a[i]<0 then s:=s+a[i];writeln('s=',s);readln;end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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