1)для записи текста использовался 256 символьный алфавит. чему равен информационный объем сообщения - id435328320230501 от Kirill3220 01.05.2023 21:03

Question

Информатика: 1)для записи текста использовался 256 символьный алфавит. чему равен информационный объем сообщения состоящего из 600 символов. 2.)для записи текста использовался 64 символьный алфавит. чему равен информационный объем сообщения состоящего из 1000 символов.

Kirill3220 · Accepted Answer

Var s:string;
n,k,i:integer;
begin
for n:=1 to 2 do
begin
writeln('Введите строку ',n,':');
readln(s);
k:=0;
for i:=1 to length(s) do
begin
case s[i] of
'[': k:=k+1;
']': k:=k-1;
end;
end;
if k=0
then writeln('В строке ',s,' количество [ и ] одинаково')
else writeln('В строке ',s,' количество [ и ] не одинаково');
end;
end.

Пример:
Введите строку 1:
c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c
В строке c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c количество [ и ] одинаково
Введите строку 2:
Просто [ пример ]] со [[ скобками
В строке Просто [ пример ]] со [[ скобками количество [ и ] не одинаково

MOGZ ответил