Program Task;
Var a, b, i: Integer;
Begin
For i := 100 To 1000 Do
Begin
a := a + i;
b := b + 1;
End;
WriteLn('Результат: ', (a / b):4:2);
ReadLn;
End.
N=2^i
512=2^i
2^9=512
i=9
Ответ: 9 бит
• текстовую
• графическую
• звуковую
• видеоинформацию
• мультимедиа информацию
1.25*28=35 мбайт после шифрования. Это 140\% от исходного объёма.
35\140*100=25.
Ответ: 25 мбайт.
Получится квадрат
Тут все легко просто представьте это в уме и все получится))