во втором задании обратите внимание на выделенный фрагмент кода. На фотке неточно видно, скорее всего разность. Но если что - подправьте.
Объяснение:
var
a, b, S, P, x, y : double;
begin
//задание с эллипсом
a := 10;
b := 5;
S := Pi*a*b;
P :=2*Pi*Sqrt((Sqr(a)+Sqr(b))/2);
//задание с блок-схемой
//тут можно ввести a и b или использовать заданные ранее
read(x);
y := Sin(x + 30*Pi/180)/(a+x)+ b-x;
Writeln(y);
end;
