2014noip复赛模拟练习20(答案).doc

Bessie那惨无人道的二年级老师搞了一个有 N (1 = N = 100) 个正整数 I (1 = I = 10^60) 的表叫Bessie去判断“奇偶性”（这个词语意思向二年级的学生解释，就是“这个数是单数，还是双数啊？”）。Bessie被那个表的长度深深地震精到了，竟然跟栋栋的泛做表格一洋多道题！！！毕竟她才刚刚学会数数啊。写一个程序读入N个整数，如果是双数，那麼在独立的一行内输出even，如果是单数则类似地输出odd. 输入格式 Input Format第一行: 一个单独的整数: N* 第2到第N+1行: 第j+1行有第j个需要判断奇偶性的整数。 输出格式：N行EVEN或ODD var s:array [1..100] of ansistring; i,l,n:longint; begin readln(n); for i:=1 to n do readln(s[i]); for i:=1 to n do begin l:=length(s[i]); if (ord(s[i][l])-48) mod 2=0 then writeln(even) else writeln(odd); end; end. 输入5 98789 12345678903456999988888777777666664355451 10233333333333333333011120 输出 ODD EVEN ODD ODD EVEN 输入 8 1111111111111111111111 2222222222222222222222 30000000000000000000000099 1222222222222222222222222222222 999999999999999999999999999999999999999999999 55555555555555555555555555555555555555555555555 77777777777777777777777777777777777777777777777777777 888888888888888888888888888888888888888888888888888888888888888888888 输出 ODD EVEN ODD EVEN ODD ODD ODD EVEN 津津的零花钱一直都是自己管理。每个月的月初妈妈给津津300元钱，津津会预算这个月的花销，并且总能做到实际花销和预算的相同。 　　为了让津津学习如何储蓄，妈妈提出，津津可以随时把整百的钱存在她那里，到了年末她会加上20％还给津津。因此津津制定了一个储蓄计划：每个月的月初，在得到妈妈给的零花钱后，如果她预计到这个月的月末手中还会有多于100元或恰好100元，她就会把整百的钱存在妈妈那里，剩余的钱留在自己手中。 　　例如11月初津津手中还有83元，妈妈给了津津300元。津津预计11月的花销是180元，那么她就会在妈妈那里存200元，自己留下183元。到了11月月末，津津手中会剩下3元钱。 　　津津发现这个储蓄计划的主要风险是，存在妈妈那里的钱在年末之前不能取出。有可能在某个月的月初，津津手中的钱加上这个月妈妈给的钱，不够这个月的原定预算。如果出现这种情况，津津将不得不在这个月省吃俭用，压缩预算。 　　现在请你根据2004年1月到12月每个月津津的预算，判断会不会出现这种情况。如果不会，计算到2004年年末，妈妈将津津平常存的钱加上20％还给津津之后，津津手中会有多少钱。 输入格式 Input Format输入文件save.in包括12行数据，每行包含一个小于350的非负整数，分别表示1月到12月津津的预算。 输出格式 Output Format输出文件save.out包括一行，这一行只包含一个整数。如果储蓄计划实施过程中出现某个月钱不够用的情况，输出-X，X表示出现这种情况的第一个月；否则输出到2004年年末津津手中会有多少钱。 var a:array [1..12] of longint; i,s,num,n:longint; begin for i:=1 to 12 do begin readln(a[i]); s:=n+300-a[i]; if s0 then begin writeln(-,i); halt; end; num:=num+(s div 100)*10; n:=s mod 100; end; num:=num*12+n; writeln(num); end. 输入288 110 310 188 16