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

Question

Инуся

21 июля, 15:16

+4

Ответы (1)

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

Вышеслав · Answer 1

Program Repeat;

varX: integer;

begin

repeat

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

Readln (X) ;

if X 111 then

until X = 111;

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

end.