Алфавит состоит из 10 букв. На диске выделено 20 байт.
Сколько символов можно записать на диск?

Question

Информатика: Алфавит состоит из 10 букв. На диске выделено 20 байт. Сколько символов можно записать на диск?

Наташа1358064225 · Accepted Answer

Program z18;  Var a: array [1..1000] of string; i,j,l,min,h:integer; s:string;Begin  write( Введите строку - ); readln(s);  l:=s.Length;  i:= 1;  j:= 1;    while i = l do  begin    while (s[i] ) and (i = l) do    begin      a[j]:=a[j] + s[i];      i:= i + 1;      if (i l) then break;    end;    j:= j + 1;    i:= i + 1;  end;    i:= 2;  min:=a[1].Length;  while (a[i] ) do  begin    l:=a[i].Length;    if (l min) then h:= i;    i:= i + 1;  end;  writeln(a[h]);End. Program z19;  Var a: array [1..1000]...

Алфавит состоит из 10 букв. На диске выделено 20 байт. Сколько символов можно записать на диск?

MOGZ ответил

Алфавит состоит из 10 букв. На диске выделено 20 байт.
Сколько символов можно записать на диск?