Макросы и переходы Опции

[dushik]

Люди, скажите: существуют ли в борланд паскале макросы или переходи, если нет, то есть ли в дельфях? А если же есть, то как это всё осуществляется? Мне просто интересно ;)

[dushik]

Да-да, гоу ту. А спросил я это потому что, да, на Си это увидал и мне интересно стало, есть ли такие возможности на моем, пока самом понятном и любимом языке
Пример макроса (2*2) на Си:

#include<stdio.h>
#define st(x) x*x
int main(){
     int i;
     int h;
     i=2;
     h=st(x);
     printf("n%d",h);
}

А вот пример перехода:

#include<stdio.h>
int main(){
     int i;
     printf("введите положительное числоn");
     scanf("n%d",i);
     if(i<0) goto phel
       else
     goto hor;
     hor:
     printf("молодец : )");
     goto endp;
     phel:
     printf("пшел нафиг, это не отрицательное число : (");
     endp:
}