:разработать программу вычисления выходного значения функ-ции 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 do
End.