program mar; uses crt; var F,k:integer; S:real; begin clrscr; F:=1; S:=1; for k:=1 to 3 do begin F:=F*k; S:=S*(2*F)/(k*k*k*k+k); writeln(k = ,k ); readkey; end. Найдите ошибку, пожалуйста, программа не идет.

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.