беда с переменными и циклами

[MarkBruh23]

здраствуйте, при присваивании переменной в цикле for программа запускается на долю секунды и выходит в окно редактора без ошибки.
вот программа(это очень ранняя и простая версия рейкастера):


program test_line;
uses graph;
var
map:array[1..100, 1..100] of word;

RD, RX, RY, RayNum, frame:integer;

PA, PX, PY, sysmap:integer;

resolution, fov:integer;

sysfov, deltaangle:real;

grDriver,grMode:integer;

begin
{for sysmap := 1 to 100 do
map[sysmap, 1] := 1;
map[sysmap, 100] := 1;
map[1, sysmap] := 1;
map[100, sysmap] := 1;
end.} #при добавлении этих строк ничего не работает

fov := 90;
sysfov := 6.28 / 360 * fov;
resolution := 320;
deltaAngle := sysfov / resolution;
detectgraph(grDriver,grMode);
InitGraph(grDriver, grMode, 'c:/tp/bgi');
for frame := 1 to 30 do
for RayNum := (0 - resolution div 2) + PA to resolution div 2 + PA do
for RD := 1 to 240 do
{RX := round(RD * cos(RayNum * deltaAngle) + 320);
RY := round(RD * sin(RAyNum * deltaAngle) + 240);} #при добавлении этих строк ничего не работает.
putPixel(round(RD * cos(RayNum * deltaAngle) + 320), round(RD * sin(RayNum*deltaAngle) + 240), 15);
end.
end.
end.
end.

прошу пращения за такой код и оформление, я еще учусь

[p51x]

end.

и

end;

немного разные вещи
вы же осознаете, что у вас в цикле выполняется одна строка?..

[MarkBruh23]

p51x, Error 94: "." expected.

изменено: после do написал begin и заработало, спасибо.