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

Question

Акилина

9 апреля, 00:22

+1

Ответы (1)

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

Марьян · Answer 1

Program Repeat;

varX: integer;

begin

repeat

Write ('Значение X = ') ;

Readln (X) ;

if X 111 then

until X = 111;

Writeln ('Молодец!') ;

end.