program xxx; var i, j, k, n, p, s : integer; a : array [1..20] of integer; begin write ('введите количество инверсий -'); readln(k); write ('введите количество ламп -'); readln(n); for i: =1 to n do a[i]: =0; for i: =1 to k do begin write ('введите инверсию p-'); readln(p); j: =p; while j< =n do begin if a[j]=0 then a[j]: =1 else a[j]: =0; j: =j+p end end; s: =0; for i: =1 to n do if a[i]=1 then s: =s+1; write ('ламп горит -', s); readlnend.
Ответ дал: Гость
56 кбит/с = 56000 бит/с (в скорости предачи данных обычно 1кбит/с = 1000 бит/с )
посчитаем кол-во данных, которые передали за 5 секунд:
56000 бит/с * 5 с = 280000 бит
в обычной кодировке один символ занимает один байт (то есть 8 бит)
Популярные вопросы