Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; …

Наш друг, Oleg Woronoff написал новый вопрос в UNC Clinic.

 

Вопрос заключается в том: Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; …

Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; ...

  Обсуждение и ответы

Пожалуйста, прочитайте обсуждение и ответы на вопросы Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; … ниже. Оставшиеся без ответа вопросы будут в ближайшее время получить обзор и обсуждение других посетителей.

Вы также можете участвовать ответить или ответить на вопрос "Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; …". Не бойтесь делиться, даже если это все-таки не так. В ClassRU.com, мы учимся друг у друга и обеспечивают обратную связь друг с другом.

Предоставляя ответы или ответы на вопросы Var n,m,i,j,k,max,z:integer; sr:real; beginwrite(‘введите n’); read(n); max:= -100; for i:=1 to n do begin for j:=1 to n -k do begin z:= random(25)-11; if max < z then max:= z; …, Вы помогли Oleg Woronoff получить ответ ему нужно.