Question

ПОМОГИТЕ, ПОЖАЛУЙСТА!!! Составить программу, которая запрашивает пароль (четырёхзначное чсило) до тех пор, пока он не будет правильно введён. Протестировать программу.в исполнителе

Answer 1

const 
pass: string = '1234'; 
var 
s: string; 
begin 
repeat 
write('pass: '); readln(s); 
until s = pass; 
end

Answer 2

const
pass: string = '1234';
var
s: string;
begin
repeat
write('pass: '); readln(s);
until s = pass;
end.

Answer 3

все