напишите программку которая вычисляет сумму отрицательных частей массива A[20].Массив

Напишите программку которая вычисляет сумму отрицательных элементов массива A[20].
Массив заполнить случайными числами из [-1000; 1000]

Задать свой вопрос
1 ответ
Program Project2;
APPTYPE CONSOLE
uses  SysUtils,windows;constnMin=1;nMax=20;typemas=array[nMin..Nmax] of integer;
Vara:mas; i:integer;s:real;begin  setconsoleCP(1251);  setconsoleOutPutCp(1251);  randomize;

for i:=1 to  nMax doa[i]:=random(1000)-500;writeln ('
Витек Лецена
writeln ('Массив');
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт