Кто понимает , скажите точно
Задан адрес электронной почты в сети Internet: [email protected] Каково имя владельца электронного адреса?
а) int.glasnet.ru
б) user-name
в) glasnet.ru
г) ru

б)user-name

Объяснение:

хер зна.........

// №1 //pascalabc.net (версия 3.1, сборка 1210 от 29.03.2016) const m = 31; var a: array[1..m] of integer; i,s,n: integer; begin   for i: =1 to m do begin       a[i]: =random(-20,20);       if a[i]> 0 then begin           s: =s+a[i]; n: =n+1;       end;   end;   println('температуры за месяц : '); a.println;   writeln('средняя в оттепель : ',s/n: 0: 3); end. тестовое решение: температуры за месяц : 16 7 19 -7 -18 6 12 -18 -5 -10 8 -4 10 4 10 5 -3 14 -7 -8 2 7 4 -7 18 4 -12 -5 -9 7 -5 средняя в оттепель : 9.000 // №2 //pascalabc.net (версия 3.1, сборка 1210 от 29.03.2016) const m = 10; var a: array[1..m] of integer; i,s,n: integer; begin   for i: =1 to m do begin       a[i]: =random(-20,20);       if i mod 2< > 0 then s: =s+a[i];   end;   writeln('исходный массив : '); a.println;   for i: =1 to m do       if i mod 2=0 then a[i]: =s;   writeln('сумма на нечетных местах  = ',s);   writeln('изиененный массив : '); a.println; end. тестовое решение: исходный массив : -6 15 5 -11 18 4 17 -9 -15 -16 сумма на нечетных местах = 19 изиененный массив : -6 19 5 19 18 19 17 19 -15 19