Найти сумму элементов целочисленного массива. помогите пожалуйста программу составить на паскале

Question

Найти сумму элементов целочисленного массива. помогите пожалуйста программу составить на паскале

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var k:array[1..10] of integer; var s:real; var i:integer; begin for i:=1 to 10 do begin k[i]:=round(10*random+3); s:=s+k[i]; end; write('Сумма массива = ', s); writeln end. Должно работать, проверьте.