Создать программу с ограниченными попытками ввода пароля. Максимальное количество попыток: 2. Ввод пароля осуществить в виде теста с полем ввода ответа. Количество вопросов 3. На паскале или делфи.

Question

Создать программу с ограниченными попытками ввода пароля. Максимальное количество попыток: 2. Ввод пароля осуществить в виде теста с полем ввода ответа. Количество вопросов 3. На паскале или делфи.

Гость

Ответ(ы) на вопрос:

Accepted Answer

Program Parol;const N=2;var x ,i: integer;beginfor i:=1 to N dobeginwriteln('Неверный пароль');readln(x);end;writeln('Verny parol');if i>N thenwriteln('zapret');end.