Файлы Форума - Картинки

# JoxaSoft (16.11.2013 / 16:45)
Измените текст на Mobik.In ))) цвет фона зелёный поди диз)))) заранее спасибо

Program Artem1;
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 Artem2;
Uses crt;
Var Z,a,b,c:real;
Begin
Writeln('a=');
Readln(a);
Writeln('b=');
Readln(b);
Writeln('c=');
Rea