Witam mam napisany program który w trzech kolumnach tablicy dwuwymiarowej umieszcza wartosci funkcji e(do x potęgi), ln x i pierwiastek z x dla argumentu x, zmieniającego się od 1.0 do 2.0 co 0.05. Ma wyświetlać elementy tej tablicy na ekranie. I cóż problem polega na tym że program mam ale wywla błąd mi na zmiennych w nim. Proszę o jakieś sugestie. Dziękuję.
uses crt;
type a=array[1..21,1..3] of byte;
var tab:a;
x:real;
i:byte;
begin
clrscr;
x:=1;i:=1;
repeat
tab[i,1]:=exp(x);
tab[i,2]:=ln(x);
tab[i,3]:=sqrt(x);
inc(x,0.05);
inc(i);
until x=2
for i:=1 to 21 do write (i,' ',x,' ', tab[i,1],' ', tab[i,2],' ',tab[i,3]);
readln;
end.