Можно использовать формулу:
=СТЕПЕНЬ(A1*B1*C1;1/3)-ОТБР(СТЕПЕНЬ(A1*B1*C1;1/3))
Program n1;
Uses CRT;
Var s: string; a: char; i,k: integer;
begin
Writeln('Vvedite stroku');
readln(s);
Writeln('Vvedite simvol');
readln(a);
For i:=1 to length(s) do
if s[i]=a then k:=k+1;
Writeln('Simvol ',a,' vstrechaetsa v stroke ',k,' raz');
readln
<span>end.</span>
Var x,s:integer;
begin
ReadLn(x);
while (x>0) do begin
s+=x;
x-=1;
end;
WriteLn(s);
end.
Нужно сравнить что было ДО редактирования с тем, что стало после редактирования. Если есть разница значит есть отличия.
Количество символов на странице = 60 строк * 56 символов = 3360 символов
По данным задачи используется 32-х символьный алфавит
Тогда <span /><span /> , отсюда <span>i</span> =<span> </span>5 бит. Такое количество информации приходится на 1 символ 32-х символьного алфавита.
Количество информации, содержащееся на странице = 3360 символов * 5 бит = 16800 бит.
Переводим в байты: 16800 бит : 8 бит = 2100 байт
Переводим в Кб<span> </span>2100 байт : 1024 байт = 2,05 Кб