Дан числовой ряд и некоторое число є. Найти сумму тех членов ряда, модуль которых больше или равен заданному числу є, если общий член этого ряда имеет следующий вид: (очень решение на паскале) ​

1. Что такое носитель? (Б) Материальная среда, используемая для записи и хранения информации

2. Носитель, имеющий наиболее массовый употребление – это (Г) Бумага

3. В каком году Александр Белл изобрел телефон? (В) 1876 г.

4. Кто создал теорию информации? (Б) К. Шеннон

5. Что такое избыточность кода? (В) Многократное повторение передаваемых данных -- неудачный ответ. Скорее многократное повторение - это один из добавить избыточность кода, есть и другие

6. Какие средства связи используются в компьютерных сетях? (Б) Радиосвязь -- есть и другие, конечно

7. Вместимость – это (А) Плотность хранения данных -- самый удачный вариант из предложенных, но всё же это не плотность хранения, а количество хранимой информации

8. Где появилась бумага? (А) В Китае

9. В каком году возникла теория связи? - нет верного ответа. Обычно упоминают 1948 год, когда была опубликована работа Шеннона "Математическая теория связи"

10. Винчестер компьютера – это (А) Пакет магнитных дисков, надетых на общую ось

1)var ar:array[1..4] of integer;
begin
ar[1]:=2;ar[2]:=2;ar[3]:=2;ar[4]:=2;
end.
2)var ar:array[1..5] of integer;
a:integer;
begin
for a:=1 to 5 do
begin;
ar[a]:=a;
writeln(ar[a]);
end;
end.
3)var ar:array[1..7] of integer;
a,b,c:integer;
begin
readln(a);
for b:=1 to 7 do
begin;
ar[b]:=a+b-1;
writeln(ar[b]);
end;
end.
4)var ar:array[1..6] of integer;
b:integer;
begin
for b:=1 to 6 do
begin;
readln(ar[b]);
ar[b]:=ar[b]*2;
writeln(ar[b]);
end;
end.
5)var ar:array[1..6] of integer;
b:integer;
begin
randomize;
for b:=1 to 6 do
begin;
ar[b]:=random(10);
ar[b]:=ar[b]*ar[b];
writeln(ar[b]);
end;
end.