Программа на Pascal, вычисляющая заданное выражение

[Excellent69]

Доброго вечера, господа! Дана задача в паскале.
Правильно ли я её сделал? Давно не програмировалл, многое забыл(( Хотелось бы, чтобы опытные пользователи проверили.

Сделал я её так:

Program keksik;
const
x=1.625;
y=-15.400;
z=0.252;
var a,b:real;
begin
a:=((power(abs(y),x+1))/(power(abs(x-2)+3,(1/3))))+((x+y/2)/(2*abs(x+y)));
b:=power((x+1),1/-sin(z));
writeln('a=',a);
writeln('b=',b);
end.

[Raketa05]

Здравствуйте! Программа запускается, но в чем ее предназначение? Было бы легче ответить на вопрос о правильности, зная исходную задачу...

Аа, не догрузилась картинка, сорри...

[Raketa05]

Да, все правильно, на мой взгляд.

[ura_111]

Правильность работы программы проверяют сторонними расчётами (на калькуляторе, например); если совпало -значит правильная программа, а если нет - значит ищи ошибку.

[type_Oleg]

Excellent69, вроде правильно, проверил в Geany , сравнил в Excel. Ты сам не мог, что ли?
У меня ушло на это 10 минут.

Только пришлось добавить uses Math; , наверное тоже надо, смотря какой именно Паскаль.

Правда, куча лишних скобок. В самих вычислениях.

[Excellent69]

Сообщение от Raketa05

Здравствуйте! Программа запускается, но в чем ее предназначение? Было бы легче ответить на вопрос о правильности, зная исходную задачу...

Аа, не догрузилась картинка, сорри...

Назначение - сдать преподавателю))

Всем спасибо за проверку))