я написал для икса косинус из b*c, исправь если нужно косинус b умножить на просто с ))
program pr;
var a,b,c:integer;
begin
readln(a,b,c);
writeln('x=',(Sqrt(abs(0.4*a-2))-3*cos(b*c)));
writeln('y=',(Ln(abs(a*b*c/2))-1/(3*a)));
end.
Для начала , чтобы найти I(Обьем книги)=(кол.станиц×кол.строк×кол.символов×вес 1 символа)I=15×33×63×8=249'480 бит, теперь переводим в кбайты 249'480÷8=31'185 байт ; 31'185÷1024=30.45кбайт , округляем будет 31
кбайт.Ответ:31 кбайт нужно выделить.
P.S: Знак (') я писал, чтобы легче было распознать число.