С ПОМОЩЬЮ ПАСКАЛЯ!
1. Задано число x. Найдите s, если:
s = cos x - sin x + |x-7| + x2 - 1
2.Даны два действительные числа.
Найти среднее арифметическое этих
чисел.
3. Задано x.
Вычислить у:

1)var x,s:real;beginreadln(x);s:=cos(x) - sin(x) + abs(x-7) + x*x - 1;writeln (s)end.2)var x,y,s:real;beginreadln(x,y);s:=(x+y)/2;writeln(s)end.3)var x,y:real;beginreadln(x);if x<0 then y:=x*x-5;if x=0 then y:=3;if x>0 then y:=x-3;writeln(y)end.