Здравствуйте исправить код паскаль Вот задание (номер 5) Вот то что у меня получилось Program 4; const x=1.2; var y,x,sum:real; i:integer; function prog(b,k:integer):real; begin sum:=1; for i:=k to b do sum:=sum*((k+x)/x); c:=sum; end; begin y:=c(3,6)+(2*(c(1,8)*c(1,8)))+x; write('y:= ', y:1:5); end.

Sndrey68085    1   16.06.2020 19:27    6