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

Question

Инуся

1 июля, 18:16

+1

Ответы (1)

Знаете ответ?

Вышеслав · Answer 1

Program Repeat;

varX: integer;

begin

repeat

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

Readln (X) ;

if X 111 then

until X = 111;

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

end.