Cоставить алгоритм вычисления выражения z=x/корень из y+3

Программа выполнена в pascalabc.net program aik; var x,y: integer; z: real; begin writeln('введите значение х: '); read(x); writeln('введите значение у: '); read(y); if (y+3)> 0 then begin z: =x/sqrt(y+3); writeln('ответ: ', z); end else begin writeln('ошибка'); end;   end.

пусть х основание системы счисления, тогда:

122х (здесь х должен стоять нижним индексом) = 1*х² + 2*х¹ + 2*х⁰=х²+2х+2 - это десятичная запись исходного числа, значит:

х²+2х+2=65

х²+2х-63=0

д= 4 + 252 = 256

х₁ = (-2-  16)/2 = -9 (не удовлетворяет)

х₂ = (-2 + 16)/2 = 7

ответ. основание системы счисления = 7.

27: 2=13       \1 13: 2=6         \1 6: 2=3           \0 3: 2=1           \1                     \1. 27(10)=11011(2).