Строка формул предназначена для отображения и редактирования содержимого активной ячейки
весь текст К бит К=<span>7680 бит/с.* 90с =691200 бит</span>
Просто смотрим какое число по модулю больше и из него вычитаем, а так как уменьшаемое меньше чем вычитаемое, то подставляем минус.
35 символов можно передать за 5 секунд при скорости 56Кб/с.
//Pascal
var
Arr: array [1..255] of byte;
i, N, A, B: byte;
begin
randomize; //В PascalABC.NET можно убрать
write('Введите количество элементов массива: '); readln(N);
writeln;
writeln(' ***Исходный массив*** ');
for i := 1 to N do
begin
Arr[i] := random(50);
write(Arr[i], ' ');
end;
writeln; writeln;
write('Введите диапазон A и B: '); readln(A, B);
writeln; writeln('Номера элементов');
for i := 1 to N do
if ((Arr[i] >= A) and (Arr[i] <= B)) then
write(i, ' ');
writeln;
readln;
end.