Question

Подпишусь, отблагодарю и выберу ответ лучшим. Только правильно и быстро и лучше прислать решение уже в Паскале.
Составить программу, которая запрашивает пароль (трехзначное число + 2 символа) до тех пор, пока он не будет правильно введен. Верный пароль должен быть задан в виде константы.

Answer 1

program HelloWorld;

const P=000;

var k,f,a:string;

begin

f:='ag';

repeat

read(a);

str(p,k);

until a=k+f;

end.