Дан массив: -7, 0, -3, 11, 5. Найти сумму отрицательных элементов. в Pascal ABC. пожалуйста. - №1835507

Дан массив: -7, 0, -3, 11, 5. Найти сумму отрицательных элементов. в Pascal ABC.

пожалуйста.
- Предмет:
  Информатика
- Автор:
  acacioqmis
- 7 лет назад

Ответы 1

var a:array[0..4] of integer = (-7, 0, -3, 11,5);var i,sum:integer;beginfor i:=0 to 4 do if(a[i]<0) then sum:=sum+a[i];writeln(sum);readln; end.
- Автор:
  virginiango0
- 7 лет назад
- 0
Добавить свой ответ

Еще вопросы

d/15+706=1002 уравнение
- Предмет:
  Математика
- Автор:
  kaylawalker
- 7 лет назад
- Ответов:
  
  1
- Смотреть
текст розповідь як ти загартовуешся 5 7 реченнь пліссс!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
- Предмет:
  Українська мова
- Автор:
  benton
- 7 лет назад
- Ответов:
  
  2
- Смотреть
5 класс, тема про Македонию и Александра Македонского.
1. Место сражения, после которого пало Персидское царство
2. Город, который Александр Македонский сделал своей столицей
- Предмет:
  История
- Автор:
  ariadnaffqq
- 7 лет назад
- Ответов:
  
  1
- Смотреть
Найдите наименьшее значение функции у=(х - 9)е^10-х на отрезке (-11;11) включая
- Предмет:
  Алгебра
- Автор:
  emeryy0ax
- 7 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years