Импортные аналоги в в туалет к ней зайди ко мне вчера и всякую возможность поставки в друзьях
Var
A,Max1,Max2:integer;
Begin
Max1:=0;
Max2:=0;
Repeat
Read(A);
if A>Max1 then
Begin
Max2:=Max1;
Max1:=A;
End;
Until A=0;
WriteLn(Max2);
End.
Пердык пук пук пук пук пукпупкпупк пукпу кпук
Мощность алфавита 64 символа - означает, что на каждый символ необходимы 6 бит информации, т.к. 2^6=64
и 250 символов будут иметь объём
i = 260*6 = 1500 бит
-2; 2 ..............................