Подберите слово, которому могут предшествовать любые из букв "к" , "па", "ко".

австрия -вена,

бельгия - брюссель,

германия- берлин,

дания - копенгаген,

испания - мадрид,

франция - париж,

швейцария - берн

var

  k: integer; begin

  read(k);

  case k of

    1..2,12: write('зима');

    3..5: write ('весна');

    6..8 : write ('лето');

    9..11: write ('осень');

  end; end.