Примечание
1байт=8бит
1 кбайт= 1024 байт
1 мбайт=1024 кбайт
объем видеопамяти = кол-во пикселей вес одного пикселя
8^1023 = 2^1026 ( в 2c/c это число принимает вид: 1 и 1026 штук нулей)
2^1024 - в 2 c|c это число = 1 и 1024 штуки нулей. (100000......0)
3 = 11 (в 2с/с)
2^1024 -11 = 111111.....101 ( всего цифр в числе =1024, только один 0, остальные единицы - 1023 штуки.)
1+1023 = 1024 - количество единиц в двоичной записи числа, которое получается при вычислении данного выражения.
<span>Вариант 4:по цвету строки с командой</span>
Program n1;
var s,s1,s2: string;
function max(a,b,c: integer): integer;
begin
max:=0;
if (a>b) and (a>c) then max:=a else
if (b>c) and (b>a) then max:=b else
if (c>a) and (c>b) then max:=c;
end;
begin
readln(s);
readln(s1);
readln(s2);
write(max(length(s),length(s1),length(s2)));
end.