Если алфавит на 64 символа, то один символ займет 6 бит
Общий объем текста 600 бит или 75 байт
Алгоритм в прикрепленном файле, для графического исполнителя "Стрелочка"
Var X,Y:real;
Begin
1Write('X = ');ReadLn(X);
if X<0 then Y:=Sqr(Sin(X))+2*X
else Y:=sqrt(X)+Sqrt(X*X+1);
Write('Y = ',Y)
End.