С помощью оператора repeat напишите программу, которая требует у вас пароль, например 111, и если пароль правильный, то печатает сообщение "Молодец"!

Program Repeat;
varX: integer;
begin
repeat 
Write (Значение X= ); 
Readln (X); 
if X <> 111 then
until X = 111;
Writeln (Молодец!);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.