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

Собственно сам п 4.7.3

Во многих случаях бывает полезно вывести значения элементов массива на экран. Так, если значения массива генерировались случайным образом, то необходимо знать, каков исходный массив. Также нужно знать, каким стал массив после обработки.

Элементы массива можно вывести в строку, разделив их пробелом:

for i:=1 to 10 do write (a[i], ' ') ;

Question

Информатика

Нинка

16 октября, 20:16

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

Собственно сам п 4.7.3

Во многих случаях бывает полезно вывести значения элементов массива на экран. Так, если значения массива генерировались случайным образом, то необходимо знать, каков исходный массив. Также нужно знать, каким стал массив после обработки.

Элементы массива можно вывести в строку, разделив их пробелом:

for i:=1 to 10 do write (a[i], ' ') ;

+3

Ответы (1)

Знаете ответ?

Русланыч · Answer 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.