Составить ! вычислить квадратные корни из нечетных чисел от 1 до 25.

Const n = 99; var  i, j, t: integer;     flag: boolean;     mas: array[1..n]of integer; begin  randomize;     i : = 0;   while i < n do      begin      t : = random(1, 99);       flag : = true;     for j : = 1 to i do      if t = mas[j] then   begin        flag : = false; break      end;       if flag then begin      i : = i + 1; mas[i] : = t      end   end;     for i : = 1 to n do   write(mas[i], ' ') end.

Const n = 99; var  i, j, t: integer;     flag: boolean;     mas: array[1..n]of integer; begin    randomize;     i : = 0;     while i < n do      begin      t : = random(1, 99);       flag : = true;       for j : = 1 to i do        if t = mas[j] then   begin          flag : = false;   break        end;       if flag then begin        i : = i + 1;   mas[i] : = t      end   end;     for i : = 1 to n do   write(mas[i], ' ') end.