Предмет: Информатика,
автор: 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.
Похожие вопросы
Предмет: Алгебра,
автор: nesterenkooleksandr2
Предмет: Английский язык,
автор: Аноним
Предмет: Биология,
автор: polinamaschenko20092
Предмет: Математика,
автор: Swetlanka732