Проблема с crt, Паскаль
 

Я нуб.
Не кидайте в меня яйцами за глупый вопрос,
я исправлюсь:feel:
Вопрос такой:

program lock;
uses crt;
const
pin = 4586;
var a: integer;
begin
readln(a);
if a = pin then
begin
TextColor(green);
writeln('Access accept');
end
else
textcolor(red);
writeln('Access denied');
end.

А выдает вот это:

Надпись 'Access denied' должна выдаваться красным цветом

И при правильном наборе пин-кода не должна высвечиваться

А где операторные скобки после ELSE? ;)

Спасибо, разобрался!:tehnari_ru_203: