За 45 сек был распечатан текст. подчитать количество страниц в тексте если известно в среднем в странице 50 строк по 75 символов в каждой, скорость печати 8кбит/сек. 1символ-1 байт. округлить ответ до целой части
50 строк *75 символов=3750 символов информационный объем всей страницы 3750*1=3750 байт кол-во символов за время распечатки к=v*t=8*45=360 символов кол-во страниц м=3750/360=10 страниц
Алексей Ксения
19.10.2021
Одну монетку откладываем. оставшиеся взвешиваем по 4 монетки в каждой чашечке весов. если весы в равновесии, нам повезло, отложенная монетка и есть фальшивая. т.е. при удаче можно обойтись одним взвешиванием. если же одна чашечка легче, значи там находится фальшивая монета. берем эти 4 монеты и раскладываем их по 2. это второе взвешивание. одна из чашечек будет легче. сравнивая вес этих двух монеты и находи фальшивую. это третье взвешивание. ответ: потребуется или одно, или три взвешивания
rozhkova
19.10.2021
Const k = 50; var s, si, sf: string; powm, n10i: longint; i, j, m, ls, err, ni, nf: integer; a: double; begin write('введите основание системы счисления (2..9): '); readln(m); if not (m in [2..9]) then writeln('ну-') else begin write('введите положительное число в этой системе счисления: '); readln(s); ls : = length(trim(s)); i : = pos('.', s); if i > 0 then begin ni : = i - 1; si : = copy(s, 1, ni); nf : = ls - i; sf : = copy(s, i + 1, nf) end else begin si : = s; ni : = ls; sf : = ''; nf : = 0 end; powm : = 1; n10i : = 0; for i : = ni downto 1 do begin val(si[i], j, err); n10i : = n10i + j * powm; powm : = powm * m end; powm : = m; a : = 0; for i : = 1 to nf do begin val(sf[i], j, err); a : = a + j / powm; powm : = powm * m end; a : = a + n10i; writeln(s, '(', m, ')=', a, '(10)') end; end. тестовое решение: введите основание системы счисления (2..9): 8 введите положительное число в этой системе счисления: 23532.5034 23532.5034(8)=10074.6318359375(10)