Интепретируйте код C++ на pascalABC

[DelProg_Klubok]

Помогите пожалуйста кто хорошо разбирается в c++ и pascalabc.
Интерпретируйте код на c++ описывающую структуру, на паскаль.

struct
{ int x; int y; }
  s[100];

И последующий для неё цикл.

for (int i=num; i>0; --i) {
   s[i].x=s[i-1].x;
   s[i].y=s[i-1].y;
}

Наверное надо создать запись, вот так?

 type
    TickDraw=record
    x,y: integer;
    s: array [0..100]of integer;
    end;

Подскажите как можно реализовать такую структуру на паскале?

[BDA]

Если делать один к одному, то:

type
  tpoint = record
    x, y: integer;
  end;
var
  s: array [0..99] of tpoint;

[DelProg_Klubok]

Ооо, спасибо!
Как же я не догадался.