С ПОМОЩЬЮ ПАСКАЛЯ!1. Задано число x. Найдите s, если:s = cos x - sin x + |x-7| + x2 -...

Question

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

---

Comments

x2 - это х в квадрате или х*2?

---

в квадрате

Answer 1

1)
var x,s:real;
begin
readln(x);
s:=cos(x) - sin(x) + abs(x-7) + x*x - 1;
writeln (s)
end.

2)
var x,y,s:real;
begin
readln(x,y);
s:=(x+y)/2;
writeln(s)
end.

3)
var x,y:real;
begin
readln(x);
if x<0 then y:=x*x-5;<br>if x=0 then y:=3;
if x>0 then y:=x-3;
writeln(y)
end.

Comments

Пока первый, потом дополню

---

Закончил. Там сначала кое-где лишние пробелы были, удалил. Но если ПаскальАВС, то это роли не играет.