v7: Тригонометрические функции


 
//*******************************************
 
Процедура Сформировать()
 
    Скрипт = создатьобъект("MSScriptControl.ScriptControl");
 
    Скрипт.Language = "JavaScript";
 
    Математика=Скрипт.Eval("Math");
 
    Сообщить(Математика.random(0));
 
    Сообщить(Математика.PI);
 
    Сообщить(Математика.E);
 
    Сообщить(Математика.LN2);
 
    Сообщить(Математика.LN10);
 
    Сообщить(Математика.LOG2E);
 
    Сообщить(Математика.LOG10E);
 
    Сообщить(Математика.SQRT1_2);
 
    Сообщить(Математика.SQRT2);
 
    Сообщить(Математика.abs(-34.5));
 
    Сообщить(Математика.ceil(-34.5));
 
    Сообщить(Математика.exp(345));
 
    Сообщить(Математика.floor(-34.5));
 
    Сообщить(Математика.log(34.5));
 
    Сообщить(Математика.max(34.5,-34.5,0,101));
 
    Сообщить(Математика.min(34.5,-34.5,0,101));
 
    Сообщить(Математика.pow(34.5,3.103));
 
    Сообщить(Математика.round(34.51));
 
    Сообщить(Математика.sqrt(34.51));
 
    Пи=Математика.PI;
 
    УголГрадус=45;
 
    УголРадиан=УголГрадус*Пи/180;
 
    Сообщить(УголРадиан);
 
    Сообщить(Математика.cos(УголРадиан),"!");
 
    Сообщить(Математика.sin(УголРадиан),"!");
 
    Сообщить(Математика.tan(УголРадиан),"!");
 
    Сообщить(Математика.acos(Математика.cos(УголРадиан)),"!!!");
 
    Сообщить(Математика.asin(Математика.sin(УголРадиан)),"!!!");
 
    Сообщить(Математика.atan(Математика.tan(УголРадиан)),"!!!");
 
    Сообщить(180*Математика.acos(Математика.cos(УголРадиан))/Пи,"!!!");
 
    Сообщить(180*Математика.asin(Математика.sin(УголРадиан))/Пи,"!!!");
 
    Сообщить(180*Математика.atan(Математика.tan(УголРадиан))/Пи,"!!!");
 
    Икс=5;
 
    Игрек=5;
 
    Сообщить(Математика.atan2(Икс,Игрек),"!!!");
 
    Сообщить(180*Математика.atan2(Икс,Игрек)/Пи,"!!!");
 
КонецПроцедуры