написать программу на псевдокоде

[0uteast]

Напишите пожалуйста программу, решающую это, если не сложно
Паскаль естественно.
Извиняюсь, что создал не в том разделе. Не могу разобраться, как удалить тему =\

[Аватар]

на псевдокоде

Ну на псевдокоде она на изображении считайте уже и написана. Отличий по крайней мере будет минимум

[Человек_Борща]

как-то так:

var
 Z1,Z2:Extended;
begin
 a := 123;
 b := 456;
  Z1 = Sqr(cos(a)-cos(b))-Sqr(sin(a)-sin(b));
  Z2 = 4*Sqr(sin(Чего?))*((a-b)/2)*cos(a+b);
end;

Писал прямо тут, лень IDE открывать...

[0uteast]

Большое спасибо

[Человек_Борща]

Это не готовое решение.