Задание:
Создать программы на языке Паскаль для обчисления математического примера.Розработать математическую постановку задач и сложыть программу на языке паскаль для ращета значения.
задание- http://pic.co.ua/en/

Написал но не запускается.(((Подскажите что не так(если можно отредактируйте)


uses crt;
var
a,x,z:real;
begin
clrscr;
writeln('x=');
readln(x);
write('z=');
readln(z);
begin
a:=(3+exp(y)-1)/(1+sqr(x)*abs(y-sin(z)/cos(z)))
end

Извените ,правильно вставлять код не умею(