T!N, просто при некоторых числах не вычесляетя результат
а причём тут это?
возможно, что уравнения не правильно посчитаются
Поэтому и нужно сначала проверить, а потом спрашивать, что не так.
2 уравнение верно. в первом уравнении не будет ли правильно записать так?
Program ArtemM;
Uses Crt;
Var M,a,b:Real;
Begin
Writeln(\'a=\');
Readln(a);
Writeln(\'b=\');
Readln(b);
M:=sqr(sin(a))*sin(a)+cos(2*sqrt(b)/exp(b+2*a)+5*ln*(b/3*a);
Writeln(\'M=\', M:2:2);
end.