//±ÉÈËµÄ·½·¨ //Ä£Äâ //¶ÔÓÚÃ¿¶Ñ ²»¹»»ò¶à¾ÍºÍÓÒ±ß½»»» Ê¹¸Ã¶Ñ´ïµ½Æ½¾ùÖµ / 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]);
This is the end of the preview. Sign up
access the rest of the document.
This note was uploaded on 02/21/2011 for the course CS 001 taught by Professor 001 during the Spring '11 term at Shandong University.