Программа в pascal. выведите на экран таблицу значений функции y=a^x для х, изменяющегося от a до b с шагом h

Программа в pascal. выведите на экран таблицу значений функции y=a^x для х, изменяющегося от a до b с шагом h.

  • Учебник дать?
  • примени эту программе себе
    {на интервале 0,16< =z<=1,6 с шагом дельта z=0,24 протабулировать
    функцию s=(y+x)в квадрате +arcsin(z) причем, если z<0,5 то х=0,1
    иначе х=0,05 }
    program tabulaciya;
    uses crt;
    var
    z,s,x,y:real;
    BEGIN
    clrscr;
    writeln('vichislenie funkcii');
    writeln('---------------------');
    writeln;
    write('vvesti Y -->');
    readln(y);
    writeln;
    writeln(' z x s');
    writeln('------------------');
    z:=0.16;
    while z < =1.6 do begin
    if z<0.5 then x:=0.1 else x:=0.05;
    if z>1 then writeln(z:4:2,x:8:2,' не существует arcsin(z)') else
    begin
    s:=sqr(x+y)+ arctan(z/(sqrt(abs(1-z*z))));
    writeln(z:4:2,x:8:2,s:7:2); end;
    z:=z+0.24; //writeln(z);
    end;
    writeln('----------------');
    writeln;
    writeln('konec zadachi');
    readkey;
    END.