Предмет: Информатика,
автор: Bloody28
Определите сумму элементов массива больших 5. Помогите ПЛИИИИЗ!)
Ответы
Автор ответа:
0
Var
a:array[1..10] of integer;
s,i:integer;
Begin
for i:=1 to 10 do Begin
a[i]:=random(10);
s:=s+a[i];
End;
Write('Сумма чисел больших пяти равна ',s);
End.
a:array[1..10] of integer;
s,i:integer;
Begin
for i:=1 to 10 do Begin
a[i]:=random(10);
s:=s+a[i];
End;
Write('Сумма чисел больших пяти равна ',s);
End.
Похожие вопросы
Предмет: Математика,
автор: dudidjddjjdjdj
Предмет: Русский язык,
автор: vladimirovadel1999
Предмет: Математика,
автор: soxjebcishxxj
Предмет: Математика,
автор: Swetlanka732