Программисты, помогите пожалуйста, очень выручите. Нужен 8 вариант. P.s PascalAbc

const   ax:array[1..3] of real=(4.3,5,10); var   i,j,k:integer;   x,y,s:real; begin   for k:=1 to 3 do begin     x:=ax[k];     y:=0;     for i:=1 to 5 do begin       s:=0;       for j:=1 to 4 do s:=s+sin(j*x)+i;       y:=y+s       end;     Writeln('x=',x:4:1,',  y=',y)     end end.      Результат x= 4.3,  y=55.7440276711038 x= 5.0,  y=60.3014385266612 x=10.0,  y=60.6300283811237