Да, такое возможно в Pascal. Вот пример кода:

var
n: Integer;
y: Real;
begin
n := 16;
y := sqrt$n$;
n := Round$sqr(y)$;
writeln$n$;
end.

Этот код сначала берет квадратный корень целого числа n, сохраняет его в вещественной переменной y, а затем находит квадрат этой вещественной переменной и сохраняет результат в целой переменной n.