Напишите программу, реализующую игру на угадывание целого числа от 1 до 10. угадываемое число определяется случайно, пользователь вводит предполагаемое значение. если число угадано, программа выводит набранные очки, а если нет-предлагает повторить попытку. каждая безуспешная попытка снижает . в начале игры назначается 10 . , , составить сдать надо завтра.

Var a,b,k,i:integer;
begin
b:=random(10)+1;
k:=10;
WriteLn('Привет, я задумал число от 1 до 10. Угадай его.');
while a<>b do
begin
Write('Введи число: ');
ReadLn(a);
if a<>b then
begin
WriteLn('Не угадал... Попробуй повторить попытку.');
k:=k-1
end
end;
WriteLn('Молодец! Угадал! Набранные очки: ',k)
end.

1. Определим скорость передачи в Мб/с

1 байт = 8 = 2³ бит.
1 Мбайт = (2¹⁰)² = 2²⁰ байт = 2²⁰ × 2³ = 2²³ бит.
Скорость 2¹⁸ бит/с равна 2¹⁸ / 2²³ = 2⁻⁶ Мбайт/с

2. Определим время, необходимое для передачи файла по А

10 Мбайт / 2⁻⁶ Мбайт/с = 10 × 32 с = 320 с

3. Определим время, необходимое для передачи файла по Б.

Объем файла после архивации составит 30% от объема исходного, следовательно и время передачи файла также будет составлять 30% от времени по варианту А.
320 с × 0.3 = 96 с
И еще 7 + 1 = 8 с нужны на подготовку файла.
Итого, время по варианту Б составит 96 + 8 = 104 с.

4. По варианту Б время меньше на 320 - 104 = 216 с, т.е. этот вариант быстрее.

ответ: Б216

Б35

Объяснение:

Обозначим объем документа в исходном состоянии V и в сжатом состоянии Vc. По условию сжатый файл . Переведем объемы файлов в обоих состояниях в биты - .

Время, требуемое на передачу файла в сжатом виде обозначим tc, в исходном t, скорость передачи данных обозначим m=218 bit. Получаем формулу . .

tc<t из чего следует, что времени на передачу сжатого файла требуется меньше чем на передачу исходного файла без сжатия. |tc-t| = ~35 (*). Секунд много, что в ответе писать в таком случае неизвестно.