А из какой степени нужно перевести в 10?
Var q,x,y:real;
BEGIN
read(x);
read(y);
q:= 2,8 * sin(x) + abs(y);
write(q);
END.
Для вложения:
Var x,y:integer;
z:real;
BEGIN
read(x);
read(y);
z:=(x + (2 + y)/x) / (y + 1/(sqrt( sqr(x) + 10 ));
write(z);
END.
2*16^4+0*16^3+4*16^2+7*16^1+8*16^0=132216
На самом деле это не сложно. Информатика в школе - это вообще несложно. Поверь. Вот смотри, в условии - числа не больше 18 и не меньше 18, то есть 18 мы можем использовать и там и там. Тогда 18 будет в клетке (3;3), а остальные числа располагаем по условие, те, что меньше 18 по горизонтали, а те что больше 18 по вертикали.