Шумовое загрязнение, влияние компьютера на человека.
Звездочка будет иметь 11 символов
В мегабайте 1024 килобайта. следовательно, 1024*1.5=1536 Кбайт
Для среднего арифметического тип данных double
Для определения большего числа int.
Var
a: array[1..10] of integer;
s, i: integer;
begin
for i:=1 to 10 do
begin
a[i]:= random(50)+1;
if (a[i] mod 2 = 0) and (i mod 2 = 0) then
s:=s+a[i];
writeln(a[i])
end;
writeln('Сумма: ', s)
<span>end.</span>