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

Question

Информатика

Руся

29 сентября, 05:30

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

+4

Ответы (1)

Знаете ответ на вопрос?

Вениамин · Answer 1

Var k:integer;

s:string;

begin

repeat

readln (s) ;

k+=1;

until length (s) >=8;

writeln (k) ;

end.

length (s) >=8 это условие правильности пароля (через and можешь добавить еще что нибудь)