Для записи текстового сообщения объёмом 9752 байта использовался алфавит мощностью 256 символов. сколько страниц занимает сообщение, если на каждой странице содержится 53 строки по 46 символов в строке?
Для кодирования одного из 256 символов требуется log(2)256=8 бит (2^8=256). 8 бит = 1 байт Количество страниц в сообщении = 9752 / (53*46*1) = 4 ответ: 4
Var s: string; a, b: integer; begin readln(s); if s[1] = 'x' then begin a := StrToInt(s[3]); b := StrToInt(s[5]); if s[2] = '-' then a := -a; writeln(b - a); end else if s[3] = 'x' then begin a := StrToInt(s[1]); b := StrToInt(s[5]); if s[2] = '-' then begin a := -a; b := -b; end; writeln(b - a); end else if s[5] = 'x' then begin a := StrToInt(s[1]); b := StrToInt(s[3]); if s[2] = '-' then b := -b; writeln(a + b); end end.
учтите что никакой защиты от дурака или неверного ввода
8 бит = 1 байт
Количество страниц в сообщении = 9752 / (53*46*1) = 4
ответ: 4