Скорость передачи данных по некоторому каналу связи равна 256000 бит/сек. передача данных через это соединение заняла2 минуты. определите информационный объем данных в килобайтах с дано, найти, решение и формулой ​

Для начала переведём скорость из битов в секунду в килобайты в секунду. (1 кбайт = 8 * 1024 бит)

256000 бит/с = 256000 / (1024 * 8) кбайт/с = 256000 / 8192 кбайт/с = 31,25 кбайт/с.

I = v * t = 31,25 кбайт/с * 2 мин = 31,25 кбайт/с * 120 с = 3750 кбайт.

ответ: I = 3750 кбайт.

V = 256000 бит/с

t = 2 минуты = 120 секунд

I - ?

I - V * t

I = 256000 * 120 = 30720000 бит = 3840000 байт = 3750 Кбайт

ответ: 3750 Кбайт

Rem BASIC-256
cls
errors = 0
print "Введите текст > ";

rem Пользователь вводит текст
input a$

rem Перебираем все буквы с начала и до предпоследней
for i=1 to length(a$)-1

rem Если встречаем букву Ч или Щ
if mid(a$, i, 1) = "ч" or mid(a$, i, 1) = "щ" then

rem Тогда проверяем следующую за ней букву.
rem Если это буква я, тогда подсчитываем очередную ошибку
if mid(a$, i + 1, 1) = "я" then errors = errors + 1
end if

rem Переходим к следующей букве
next i

rem Вывод результата
print "Количество ошибок в тексте ";
print errors

rem Конец программы
end

Var a,b,c,n:integer;
begin
for a:=1 to 7 do
  for b:=a+1 to 8 do
    for c:=b+1 to 9 do
      begin
      n:=a*100+b*10+c;
      write(n:4)
      end;
end.

var
  i,j,n:integer;
  a:array[1..4,1..5]of real;
begin
for i:=1 to 4 do
  begin
  for j:=1 to 5 do
    begin
    a[i,j]:=random*2-1;
    write(a[i,j]:20:15);
    if a[i,j]>=0 then n:=n+1;
    end;
  writeln;
  end;
writeln('Количество неотрицательных: ',n);
end.

var
  i,j,sum:integer;
  a:array[1..3,1..4]of integer;
begin
for i:=1 to 3 do
  for j:=1 to 4 do
    readln(a[i,j]);
writeln('Массив:');
for i:=1 to 3 do
  begin
  for j:=1 to 4 do
    begin
    sum:=sum+a[i,j];
    write(a[i,j]:4);
    end;
  writeln('sum=':8,sum);
  sum:=0;
  end;
end.