Задан массив a1, a2, , an из целых чисел. Вычислите их

Задан массив a1, a2, , an из целых чисел. Вычислите их сумму.

Задать свой вопрос
1 ответ
Const nx =50;var n,sum,i:integer;R:Array[1..25] of integer;Beginwrite('Введите количество элементов n ');Read(n);for i:=1 to n do beginR[i]:= random(10)-5;write(R[i]:3);sum:= sum +R[i];end;writeln;write('Сумма всех чисел = ',sum)end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт