Перевести код из Паскаля в Си uses crt;const maxslov=10;slovar: array[1..maxslov] of

include lt;string.hgt;
include lt;iostreamgt;

int main()
  int maxslov = 10;
  char *slovar[maxslov];
  slovar[0] = "Информатика";
  slovar[1] = "Математика";
  slovar[2] = "Алгебра";
  slovar[3] = "Имя";
  slovar[4] = "Паскаль";
  slovar[5] = "Папка";
  slovar[6] = "Веб-сайт";
  slovar[7] = "Вегас";
  slovar[8] = "Телефон";
  slovar[9] = "Пара";
  char *pr[8] = " ", ".", ",", ";", ":", "-", "!", "?";
  char *s, *sl;
  int i, j, k;
  bool punct;

  while (true)
    std::coutlt;lt;"s=";
    std::cingt;gt;s;
    s = strcat(s, " ");
    sl = "";
    for ( i = 0; i lt;= strlen(s); i++ )
      for ( j = 0; j lt;= 8; j++ )
        if ( strcmp(pr[j], s[i]) )
          punct = true;
       
        else
          punct = false;
       
     
      if ( !(punct) )
        sl = strcat(sl, s[i]);
     
      else
        if ( strlen(sl) gt; 0 )
          k = 0;
          for ( j = 0; j lt;= maxslov; j++ )
            if (slovar[j] = sl)
              k++;
           
         
          if (k = 0)
            std::coutlt;lt;"Слово \""lt;lt;sllt;lt;"\" написано ошибочно,или не найдено в словаре."lt;lt;endl;
         
          else
            std::coutlt;lt;"Слово \""lt;lt;sllt;lt;"\" написано верно."lt;lt;std::endl;
         
          sl = " ";
       
     
   
 
  return 0;