// Лаб 2 часть 3
open System;

let function1(x: double, y: double) =
    printf "%f " ( sqrt( (pown (log( (cos(x + y) * cos(x + y)) / sin((x + y) * (x + y)) )) 2) + exp (x * x * y)))

printf "Введите x: "
let x = Convert.ToDouble(Console.ReadLine());
printf "Введите y: "
let y = Convert.ToDouble(Console.ReadLine());
function1(x, y)

Console.ReadLine();