• Pascal, цикл для, составить программу.
    2)Составить программу, запрашивающую пароль пользователя. В случае правильности пароля выводится фраза: “Можно приступать к работе». Если пароль 3 раза введен неверно, то вывести «Вызываю охрану»

Ответы 1

  • var pass,s:string; k:integer;beginpass:='12345';k:=0;repeatwriteln('Введите пароль:');readln(s);k:=k+1;until (s=pass)or(k=3);if s=pass then writeln('Можно приступать к работе') else writeln('Вызываю охрану');end.Пример:Введите пароль:1Введите пароль:12345Можно приступать к работе
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years