Pascal/Turbo Pascal - NECESITO AYUDA CON MI PROYECTO !!!

HOLA como stan tengo problemas con 1 proyecto q tengo q hacer es sobre
una factura ps tengo q hacer un marco con centencia FOR ps la hago con gotoxy
y solo me salen las primeras 2 lineas y cuando pongo la 3ra ya no sale nada bien
alguien me puede ayudar? o mandarme el marco echo?

SOLO CON SENTENCIA FOR Y GOTO XY
X FAVOR VARIABLE: LINEA

gracias :)

pfff pajisima
mira pssss t paso la progra xq komo ke xplikartelo ta algo largo tonces mira seria algo asi

uses crt;
var w,x,y,z:word;
begin
clrscr;
write('╔');
for w:= 1 to 78 do
write('═');
write('╗');
for x:= 1 to 22 do
writeln('║');
write('╚');
for y:= 1 to 78 do
write('═');
write('╝');
for z:= 1 to 22 do
begin
gotoxy(80,z+1);
writeln('║');
end;
readkey
end.

eso deberia d servir si no psss me avisas i io miro ke ta mal

1 kosa

mira si sos dl lehnsen ponete vivo vs xq ia el proyekto es para la prox semana si no solo no hagas kaso a esto

necesito programar ;las cuat5ro operaciones aritmeticas y usar el gotoxy,gracias