Составить программу, которая запрашивает пароль (например, четырехзначное число) до тех пор, пока он не будет - QBasic

Формулировка задачи:

QBasic. Сам, что-то, не вдупляю... Как сделать :|

Код к задаче: «Составить программу, которая запрашивает пароль (например, четырехзначное число) до тех пор, пока он не будет - QBasic»

textual
PRINT "Password?"
DO
pass$ = INPUT$(4) ' Без показа символов и не надо нажимать клавишу Ввод
'INPUT pass$            ' Обычный вариант, с показом символов
LOOP WHILE pass$ <> "1234"
PRINT "Password OK!"

12   голосов, оценка 3.917 из 5


СОХРАНИТЬ ССЫЛКУ