vj1123 均分纸牌

Vj1123 均分纸牌

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
//±ÉÈ˵ķ½·¨ //Ä£Äâ //¶ÔÓÚÿ¶Ñ ²»¹»»ò¶à¾ÍºÍÓұ߽»»» ʹ¸Ã¶Ñ´ïµ½Æ½¾ùÖµ / const maxn=100; var n,ans:integer; aver:longint; a:array[0. .maxn] of integer; procedure init; var i:integer; begin readln(n); for i:=1 to n do begin read(a[i]);
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.
Ask a homework question - tutors are online