154 в 8 → 4*8∧0+5*8∧1+1*8∧2=4*1+40+64=108 в 10
Var x,y:real;
begin
write('x, y:');
readln(x,y);
if (y<=-0.75*x*x+5)and(y>=x)and(y>=-x)
then writeln('Точка принадлежит заштрихованной области')
else writeln('Точка не принадлежит заштрихованной области');
end.
Пример:
<span>x, y:
2 1
Точка не принадлежит заштрихованной области</span>
Дано двухзначное и трехзначное число. Найти квадрат суммы десятков этих чисел.