Question

Входной замок на двери лисы алисы работает следующим образом: если введено натуральное число, которое меньше 100 или больше 999 − на дисплее устройства появляется надпись «false»; если у введенного числа все цифры различные или сумма цифр числа равна 13 − появляется надпись «enter» и можно войти; в остальных случаях − появляется надпись «lock». входные данные натуральное число n (1≤n≤10000) выходные данные необходимо вывести надпись, которая должна быть на дисплее примерыinput.txtoutput.txt 2 false 427 enter 318 lock

Answer 1

Var
  n, a, b, c : integer;
begin
  read (n);
  if (n < 100) or (n > 999) then writeln ('FALSE')
  else
begin
  a := n div 100;
  b := (n div 10) mod 10;
  c := n mod 10;
  if ((a <> b) and (b <> c) and (a <> c)) or (a + b + c = 13) then
    writeln ('ENTER')
  else writeln ('LOCK'); 
end;
end.