level 5
贴吧用户_7R8WCNX
楼主
var
x:integer;
begin
read(x);
case x of
(x<10):writeln('A');
(x>=10)and(x<40):writeln('B');
(x>=40)and(x<50):writeln('C');
else writeln('D')
end
end.
2016年11月10日 12点11分
1
x:integer;
begin
read(x);
case x of
(x<10):writeln('A');
(x>=10)and(x<40):writeln('B');
(x>=40)and(x<50):writeln('C');
else writeln('D')
end
end.