Ще один тест плагіну підсвічування коду

unit Unit1
Uses Windows;
var
x:integer;
begin
x:=5;
WriteLn(intToStr(x));
ReadLn;
end.