Помощь в Pascal

Извиняюсь если тема не соответствует названию или раздел не тот.
Правильно ли составлены программы по уравнениям?
[code]
Program ArtemM;
Uses Crt;
Var M,a,b:Real;
Begin
Writeln(\'a=\');
Readln(a);
Writeln(\'b=\');
Readln(b);
M:=(exp(3*ln(sin(a)))+cos(2*sqrt(b))/exp(b+2*a)+5*ln(b/(3*a)));
Writeln(\'M=\', M:2:2);
end.

Program ArtemZ;
Uses Crt;
Var Z,a,b,c:Real;
Begin
Writeln(\'a=\');
Readln(a);
Writeln(\'b=\');
Readln(b);
Writeln(\'c=\');
Readln(c);
Z:=(-b+sqrt(sqr(b)-4*a*c))/(2*a);
Writeln(\'Z=\', Z:2:2);
end.
[/code]
Добавлено 20.11.13 в 20:57:21:
уравнения

Прикрепленные файлы:
PROFIWM_COM_2466_533737_yBVQvF8kznI.jpg (13.99 кб)

2 да) А 1 еще такого не проходили

DemiX_GW, в смысле не проходили?

axaxa)

Впрямом

не оффтопьте.

2 кед

DemiX_GW, ))

Доки?

В чем проблема проверить в компиляторе?