Дополните созданную в п.4.7.3 программу формирования массива так,чтобы вычислялась сумма элементов массива и результат суммирования выводился на экран. Собственно сам п 4.7.3 Во многих случаях бывает полезно вывести значения э...
Дополните созданную в п.4.7.3 программу формирования массива так,чтобы вычислялась сумма элементов массива и результат суммирования выводился на экран.
Собственно сам п 4.7.3
Во многих случаях бывает полезно вывести значения элементов массива на экран. Так, если значения массива генерировались случайным образом, то необходимо знать, каков исходный массив. Также нужно знать, каким стал массив после обработки.
Элементы массива можно вывести в строку, разделив их пробелом:
for i:=1 to 10 do write (a[i], ' ');
Ответ(ы) на вопрос:
Гость
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.
Не нашли ответ?
Похожие вопросы