Beginvar b:boolean; s:real;a:=0;writeln('slovo');readln(z);while not (eof(z)) do beginif z=d then a:=a+1;writeln(a);end;end.
<span>а) ні</span>
<span>б) так</span>
<span>в) так</span>
<span>г) так</span>
Ответ:
a:3:0
Объяснение:
Первое число - ширина поля вывода. Если ширина поля больше, чем длина числа, то вывод дополняется пробелами перед числом.
Второе число - количество цифр после запятой.
По-английски формат "Value : field_width : decimal_field_width"
1.
Дано:
K = 800*600 = 480000
q = 14400 бит/с = 1800 байт/с
N = 16 777 216
Найти:
t - ?
Решение:
i = log₂N
i = log₂16 777 216 = 24 бит = 3 байта
V = K * i = 480000 * 3 байта = 1 440 000 байт
V = q * t
t = V / q
t = 1 440 000 байт : 1800 байт/c = 800 с ≈ 13, 3 мин
Ответ: 13, 3 мин
2.
Дано:
N = 16
K = 640*400 = 256 000
Vизобр. = 1250 Кбайт
Найти:
Решение:
Vстр. = K * i
i = log₂N
i = log₂16 = 4 бита
Vстр. = 256 000 * 4 бита = 1 024 000 бит / 8 = 128 000 байт = 125 Кбайт
Кол-во страниц = Vизобр. / Vстр.
Кол-во страниц = 1250 Кбайт : 125 Кбайт = 10
Ответ: 10 страниц
3 внука
Алгоритм решения:
Голик А.А. id 96
В столбце родителей ищем всех детей от id 96
Всего 2: 62, 82
Теперь в столбце родителей ищем всех детей от id 62, id 82
Всего 3: 25, 105, 38
Ответ: 3