X = min(A,B, min(C,D)) + max(sin(A), D) помогите пожалуйста

Ответ:

pascalABC

Объяснение:

program funkcia;

var

 a, b, c, d, x: real;

begin

 Write('Введите значения A, B, C и D через пробел: ');

 ReadLn(a, b, c, d);

 x := min(a, b, min(c, d)) + max(sin(a), d);

 WriteLn('x = ', x)

end.