С помощью точек нарисуте горизонтальную линию ,разделяющую экран ** две равные части.

Question

С помощью точек нарисуте горизонтальную линию ,разделяющую экран на две равные части.

Answer 1

Uses graphAbc;
var 
x: integer;

begin
for x:=1 to 640 do
setpixel(x,240,clred)
end.