You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
program casetest;
|
|
|
|
var
|
|
input: integer;
|
|
|
|
begin
|
|
ReadLn(input);
|
|
case (input) of
|
|
0..49 : WriteLn('kleiner 49');
|
|
50..52 : WriteLn('50 - 52');
|
|
else
|
|
if (input < 0) then
|
|
Writeln('kleiner 49')
|
|
else
|
|
WriteLn('groesser 52');
|
|
end;
|
|
end. |