|
|
вернуться в форумAny1 tell me why my greedy (obvious) doesn`t work correct? Var N, K : LongInt; begin Readln(N, K); WriteLn((Sqr(N)-Sqr(N Mod K)) Div K); end. sorry i meant 1255...! > Var > N, K : LongInt; > begin > Readln(N, K); > WriteLn((Sqr(N)-Sqr(N Mod K)) Div K); > end. |
|
|