|
|
back to boardShow all messages Hide all messageswhere is my mistake? falls on 5th var i,nr,n,k,c:integer; begin read(n,k); nr:=trunc(n/2); if (k>nr) then begin for i:=nr+1 to k-1 do inc(c); end; if (k<nr) then begin for i:=k+1 to nr do inc(c); end; write(c); end. A person with mistake in DNA solved more problems than you. really???!!! and how do you know it? |
|
|