Program prcase;
Var
a: integer;
Begin
writeln('Введите номер');
readln(a);
case a of
25, 345, 654, 27, 29 : writeln ('первый отряд');
2, 65, 74 ,94, 290 : writeln ('второй отряд');
234, 54, 283, 571, 30, 12 : writeln ('третий отряд');
else writeln ('субъект не числится') ;
end;
End.
UHJvZ3JhbSBwcmNhc2U7ClZhcgogIGE6IGludGVnZXI7CkJlZ2luCiAgd3JpdGVsbign0JLQstC10LTQuNGC0LUg0L3QvtC80LXRgCcpOwogIHJlYWRsbihhKTsKICAgY2FzZSBhIG9mCiAgICAgICAgMjUsIDM0NSwgNjU0LCAyNywgMjkgOiB3cml0ZWxuICgn0L/QtdGA0LLRi9C5INC+0YLRgNGP0LQnKTsKICAgICAgICAyLCA2NSwgNzQgLDk0LCAyOTAgOiB3cml0ZWxuICgn0LLRgtC+0YDQvtC5INC+0YLRgNGP0LQnKTsKICAgICAgICAyMzQsIDU0LCAyODMsIDU3MSwgMzAsIDEyIDogd3JpdGVsbiAoJ9GC0YDQtdGC0LjQuSDQvtGC0YDRj9C0Jyk7CiAgIGVsc2Ugd3JpdGVsbiAoJ9GB0YPQsdGK0LXQutGCINC90LUg0YfQuNGB0LvQuNGC0YHRjycpIDsKICAgZW5kOwpFbmQu