Выдает ошибку: Нельзя преобразовывать тип real к integer - Turbo Pascal

Формулировка задачи:

Выдает ошибку "Нельзя преобразовывать тип real к integer." В строчке 21. Уже не первый раз такое, хочу понять от чего зависит эта ошибка?. Заранее спасибо!

program ps2;
Var
i,j,m,k:integer;
A:array[1..3,1..3] of integer;
Begin
For i:=1 to 3 do
 Begin
  For j:=1 to 3 do
   Begin
   A[i,j]:=random(10)+10;
   write(A[i,j]:3);
   End;
   writeln;
 End;
   writeln;
 For i:=1 to 3 do
    Begin
     For j:=1 to 3 do
       Begin 
        If A[i,j] > 0 then
         A[i,j]:=sqrt(A[i,j])
         Else A[i,j]:=(A[i,j]*A[i,j]);
       End;
    End; 
    For i:=1 to 3 do
  For j:=1 to 3 do
   write(A[i,j]:3);
 End.

Puporev

, Пожалуйста объясните если не трудно(

Решение задачи: «Выдает ошибку: Нельзя преобразовывать тип real к integer»

Листинг программы

A[i,j]:=round(sqrt(A[i,j]));

Объяснение кода листинга программы

В данном коде происходит следующее:

Переменная A представляет собой матрицу, которую мы будем использовать в дальнейшем.
Функция sqrt вычисляет квадратный корень числа.
Функция round округляет результат до ближайшего целого числа.
Результат вычисления sqrt(A[i,j]) преобразуется в целое число с помощью функции round.
Полученное целое число сохраняется в переменную A[i,j].