Paskal abcТут задача, в которой нужно ввести верно пароль, ну дак вот нужно составить…

Question

52

Paskal abcТут задача, в которой нужно ввести верно пароль, ну дак вот нужно составить похожую программу, но так что-бы было 3 попытки ввода пароля, ну и после этих попыток будет например «Вы ввели не верный пароль, попытки исчерпаны"можно сделать через string-program test1; var x,y: integer; beginy: =555; repeatwriteln (‘введите пароль’); readln (x); until y=xwriteln (‘Поздравляем, вы ввели пароль верно’); end.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

maxcasher · Accepted Answer

38

maxcasher

27 января 2024

Program test1; var x, y, i: integer; begin y: =555; for i: =1 to 3 do begin writeln ('введите пароль'); readln (x); if y=x then begin writeln ('Поздравляем, вы ввели пароль верно'); break; end; end; if x <> y then writeln ('Попытки исчерпаны'); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: