с информатикой. Это надо делать в паскале

1) Вычислить значение функции
y= x2-7sin x+cos x

2)Вычислить значение функции
y=cos2 (2x+ 25)

Если используете PascalABC.NET, уберите следующую строку:

uses Math; Задание 1uses Math;var  x, y: real; begin  Write('Введите x: ');  Readln(x);    y := Sqr(x) - 7 * Sin(x) + Cos(x);    Writeln('y = ', y);end.Задание 2uses Math;var  x, y: real; begin  Write('Введите x: ');  Readln(x);    y := Sqr(Cos(2 * x + 25));    Writeln('y = ', y);end.

===== PascalABC.NET =====

begin

   var x := ReadReal;

   Print(x * x - 7 * Sin(x) + Cos(x));    // 1

   Print(Sqr(Cos(2 * x + 25)))    // 2

end.