// Условный оператор. Сокращенная форма var pass: string; begin writeln('Введите пароль: '); readln(pass); if pass = 'NET' then writeln('Пароль правильный'); end.