Что то подобное без программирования, только формулы.
Если использовать VBA, можно получить лучше оформленные отчеты.
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
var
m,n:integer;
begin
Write('Введите М и N: '); Read(m,n);
if m<>n then begin m:=0; n:=1 end
else begin m:=2*m; n:=2*n end;
Writeln('m=',m,', n=',n)
end.
<u><em>Тестовые решения:</em></u>
Введите М и N: 5 7
m=0, n=1
Введите М и N: 4 4
m=8, n=8
1) Находим мощность кодировки по формуле
N = 2^i
Мощность кодировки (N) = 2^i=256; i=8; соответственно 1 символ занимает 1 байт или 8 бит.
2) Переводим объём информации (0,25 Кбайт) в байты. Давайте лучше считать в байтах.
0,25 Кбайт = 256 байт,
3) Находим кол-во символов в тексте.
256 / 1 = 256 символов
Ответ: текст содержит 256 символов.
Бгиииии дега. Лчщвькллвьяжяд38287#;@&
[email protected]*1*#&'сшррп,бял73718183837376аьвьвлсшсшашвлядйдфщ 272&17 вьвллыц 77.