Мегаба́йт (русское обозначение: Мбайт; международное: Mbyte, MB) — единица измерения количества информации, обозначающая, в зависимости от контекста взято с вики
запишем условие: мощность алфавита равна N=256, страниц=3, строк=48, символов=64, I=?
решение: подсчитаем общее количество символов в тексте
К=3*48*64=9216
найдем вес одного символа алфавита
256=2^i, 2^8=2^i, i=8 бит
вычислим информационный объем текста
I=K*i=9216*8=73728 бит=9216 байт
Потому что архивторы работают не со всеми типами файлов
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var k:real;
var b:real;
repeat
k := ReadReal('Введите k');
b := ReadReal('Введите b');
until k <> 0;
var x := -2;
while x <= 2 do
begin
print(k * x + b);
x := x + 2;
end;
end.
Var r,L,S:real;
begin
read (r);
L:=2*3.14*r;
S:=4*3.14*r*r;
write('длина...=',L);
write('площадь...=',S);
End.