Задание: разработать программу вычисления выходного значения функ-ции y=f(x1,x2,x3,x4). Тип входных и выходных данных, вид функции заданы в табл. 2. Выходное значение и входные должны отображаться на экране в виде: X1= X2= X3= X4= Y=

 

Разработать функцию, которая автоматически заполняет массив из 10 наборов входных данных. Массив затем подвергается обработке, т.е. в цикле вычисляются значения функции и выводятся на экран в виде: Y1= Y2= Y3= Y4= , и т.д.

 

тип входных данных: целое тип выходных данных: целое, функция: x1*sin(x2) + x3*sin(x4)

var x1,x2,x3,x4,i:integer;function f(x1,x2,x3,x4:integer):real;begin    f:=x1*sin(x2)+x3*sin(x4);end;Begin    for i := 1 to 10 do        readln(x1,x2,x3,x4);        writeln(" x1=",x1," x2=",x2," x3=",x3," x4=",x4," y=",f(x1,x2,x3,x4));    for j := 1 to n doEnd.