【USACO】双数? 单数?

【USACO】双数? 单数?

题意分析：

这道题的题意还是比较明了的，就是读入一个很大的数，判断它是奇数还是偶数。

解题思路：

因为我们知道，任意一个数最后一位是奇数，这个数就是奇数，偶数，同理。

这道题可以用2种方法做

方法一：

用字符串读入，把这个字符串的最后一位转换成数字，再判断。

方法二：

同样用字符串读入，但是不要把最后一位转换过去，而是用case判断。

 

方法一：

算法分析：

读入一串字符串s，用val把这个字符串的最后一位length（s）转换成数字a，再用odd判断a是不是奇数。

答案参考：

var

n,i,a:longint;

s:string;

begin

readln(n);

for i:=1 to n do

begin

readln(s);

val(s[length(s)],a);        //转换

if odd(a) then writeln('odd')

else writeln('even');

end;

end.

方法二：

算法分析：

同样用字符串读入，但是不要把最后一位转换过去，而是用case判断，

如果最后一位是1,3,5,7,9，它就是奇数

如果是0,2,4,6,8，它就是偶数。

答案参考：

var

n,i,a:longint;

s:string;

begin

readln(n);

for i:=1 to n do

begin

readln(s);

case s[length(s)] of

'1','3','5','7','9':writeln('odd');

'0','2','4','6','8':writeln('even');

end;

end;

end.