Составить програму которая выводит на экран квадраты n первых натуральных чисел

Паскаль Откомпилирован: (Pascal ABC) program z1; uses crt; var    n: integer;    i: integer; begin     write(' Введите n :  ');     readln(n);         for i := 1 to n do     begin          writeln(' Число:',i,' Степень:', i *i);     end; end.   Си Откомпилирован: (DEV Cpp) #include #include #include #include int main() {  int n = 0;    printf("\n Vvedite n:  ");  scanf("%d", &n);  printf("\n Chislo | Stepen");  for(int i = 1; i < n; i++)  {          printf("\n %5d  |%5d ", i, i * i);  }  getch( );  return 0; }