Дополните созданную в п.4.7.3 программу формирования массива так,чтоб рассчитывалась сумма

Дополните сделанную в п.4.7.3 программу формирования массива так,чтобы рассчитывалась сумма частей массива и результат суммирования выводился на экран.
Фактически сам п 4.7.3
Во многих случаях бывает полезно вывести значения частей массива на экран. Так, если значения массива генерировались случайным образом, то нужно знать, каковой начальный массив. Также нужно знать, каким стал массив после обработки.
Элементы массива можно вывести в строчку, разделив их пробелом:
for i:=1 to 10 do write (a[i], ' ');

Задать свой вопрос
1 ответ
Var a: array[1..10] of integer;
sum, i: integer;
begin
sum := 0;
for i := 1 to 10 do begin
a[i] := random(10);
write (a[i], ' ');
sum := sum + a[i];
end;
writeln();
write('Сумма всех частей: ', sum);
end.
Мишаня Домогатский
Огромное спасибо
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт