Ahoj. Potřebovala bych poradit prosím s touto úlohou z Pascalu.Přivítala bych postup, nebo rozepsaný program (popřípadě jeho část). Předem děkuji.

Napište program, který nakreslí titulní rámeček(hlavní nabídku) v horní části obrazovky. Zadejte souřadnice levého horního vrcholu a délku a šířku kresleného rámečku

Zkus hledat na webu, zadani zni trivialne -- staci budto textove znaky nebo graficky treba nejakou funkci krelici usecky nakreslit "carou" ramecek.

program abc;

procedure VymazObrazovku;
begin
  { toto musis implementovat, nepises v akom rezime sa to ma robit - textovy/graficky }
end;

procedure NapisPolozku(poloha : integer; nadpis : string);
begin
  { detto - v textovom locate + write, v grafike outtextxy alebo textout... }
end;

procedure HorneMenu(polozky : array of string);
var i : integer;
begin
  VymazObrazovku;
  for i := 0 to high(polozky) do
    NapisPolozku(i,polozky[i]);
end;

begin
  { inicializacia obrazovky - textova al. graficka, neviem }

  { horne menu }
  HorneMenu(['Subor','Edituj','Nastavenie','Pomoc']);
end.