using System;
using static System.Console;
class Program
{
static void Main()
{
const int n=10;
int[] a=new int[n];
double s=0,s1=0;
Random rnd=new Random();
Write("массив: ");
for(int i=0;i<a.Length;i++)
{
a[i]=rnd.Next(-20,20);
Write(a[i].ToString()+" ");
if(a[i]>0)
s+=a[i];
if(a[i]<0)
s1+=a[i];
}
WriteLine("");
Write("результат: "+(s/Math.Abs(s1)).ToString());
}
}
^_^^_^^_^^_^во вложении ^_^^_^^_^^_^
// счет разрядов от нуля справа налево: ХХХ5ХХ2ХХ
var
n:longint;
a,b,k,d:integer;
begin
Write('Введите натуральное число длиной 6-9 цифр: ');
Read(n);
k:=0;
while n>0 do begin
d:=n mod 10;
if k=2 then a:=d
else
if k=5 then b:=d;
Inc(k);
n:=n div 10
end;
Writeln('Ср. арифм. разрядов 2 и 5 равно ',(a+b)/2)
end.
Пример
Введите натуральное число длиной 6-9 цифр: 123456789
Ср. арифм. разрядов 2 и 5 равно 5.5
Например, можно расставить следующим образом
(1+2+3+4):5+6-7=1