Предмет: Информатика,
автор: wizard1052
дан массив d=[5,10,15] запишите программный код для вычисления суммы элементов в данном массиве
Ответы
Автор ответа:
1
Ответ:
Program massiv;
Const n=100;
Var a:array[1..n] of integer;
i,s:integer;
Begin
s:=0;
For i:=1 to n do
Begin
a[i]:=i*i;
Write(a[i]:6);
s:=s+a[i];
end;
WriteLn;
Write('Сумма=',s);
end.
Объяснение:
Похожие вопросы
Предмет: Английский язык,
автор: Swatar
Предмет: Английский язык,
автор: MilanaIvanova222
Предмет: Русский язык,
автор: Фаршик1
Предмет: Математика,
автор: никтоп1
Предмет: Информатика,
автор: Lilуа