Найдите значение переменной А после выполнения программы VAR A:INTEGER BEGIN A:=SQRT(16): END
Sqrt(16) это 16 под корнем, получается ответ 4