program Automat1;

var Tlacitko: integer;

begin
  writeln('Dobr den, vyberte si npoj.');
  writeln('1: Kva.');
  writeln('2: aj.');
  writeln('3: Hork okolda.');
  readln(Tlacitko);
  case Tlacitko of
    1:
      begin
        writeln('Kva je hotov.');
        writeln('Dobrou chu.');
      end;
    2:
      begin
        writeln('aj je hotov.');
        writeln('Dobrou chu.');
      end;
    3:
      begin
        writeln('okolda je hotov.');
        writeln('Dobrou chu.');
      end;
    else
      writeln('Pro vdej npoje stisknte 1-3.');
  end;
  writeln('Pokraujte stisknutm klvesy Enter.');
  readln();
end.