Программисты, помогите с переводом с си на паскаль.⁠⁠

#include
#include
#include
#define n 10
int main()
{
int a[n];
int i,k=0,s=0,x1,x2;
clrscr();//можно убрать если компилятор ругается
randomize();//и это тоже
printf("Massiv:nn");
for(i=0;i