Question

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

Answer 1

var k:integer;
s:string;
begin
repeat
readln(s);
k+=1;
until length(s)>=8;
writeln(k);
end.

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

Answer 2

там "К+=1" ты ничего не пропустил? :)

Answer 3

k+=1 значит k:=k+1

Answer 4

спасибо)

Answer 5

но немного по другому надо было, нужно было чтобы выводился текст:"введите пароль" итд