c中的for(i=0,j=0;i<n,j<t;i++,j++)在delphi中是怎样的？

Question

谢谢。

Answer 1

for i:=0 to n-1 do 
  for j:=0 to t-1 do 
  begin
    //Some code you wanna add here!
  end;

Answer 2

var i,j:integer;
 for i:=0 to i<n do
  begin
  for j:=0 to j<t do
  begin
   ...
   inc(j);  
  end;
  inc(i);
 end;

Answer 3

for(i=0,j=0;i<n,j<t;i++,j++)i:= 0;
j:= 0;
while j<t do begin
  inc(i); 
  inc(j);
end;

Answer 4

应该是
var i,j:integer;
 for i:=0 to i<n－1 do
  begin
  for j:=0 to j<t－1 do
  begin
   ...
   inc(j);  
  end;
  inc(i);
 end;

Answer 5

//for(i=0,j=0;i<n,j<t;i++,j++)
//结果是这样～～
i := 0;
j := 0;
while j < t do begin
  Inc(i);
  Inc(j);
end;
//不过这好象意义不大～～
//能说明什么呢？pascal的严谨？c的灵活？地球人都知道～～//用于调试的代码～～
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int i, j;
  int n = 10, t = 5;  for(i = 0, j = 0; i < n, j < t; i++, j++) {
    Memo1->Lines->Add(IntToStr(i) + "," + IntToStr(j));
  }
}//---------------------------------------------------------------------------
//[C++ Warning] Unit1.cpp(26): W8004 'n' is assigned a value that is never usedprocedure TForm1.Button1Click(Sender: TObject);
var
  i, j, n, t: Integer;
begin
  i := 0;
  j := 0;
  n := 10;
  t := 5;
  while j < t do begin
    Memo1.Lines.Add(IntToStr(i) + ',' + IntToStr(j));
    Inc(i);
    Inc(j);
  end;
end;

Answer 6

i := 0;
j := 0;
while (j<t) do
begin
  inc(i); 
  inc(j);
end;

Answer 7

To zswang  俺不明白你想说明什么，可以说详细点吗？

Answer 8

to FrameSniper:
主要是不知道楼主问这个问题是考大家还是真的不明白～～
只是和大家研究研究不要太认真了～～
看不明白就算了～～

Answer 9

to zswang
  我是真的不懂，在转换下面这段huffmac的代码时遇到了困难：
 
       for(i=1;i<=n;++i)
  { 
     start=n-1; 
     for(c=i,f=(*HT)[i].parent;f!=0;c=f,f=(*HT)[f].parent)
 { 
       if((*HT)[f].lchild==c) cd[--start]='0'; 
       else cd[--start]='1'; 
     }      (*HC)[i]=(char *)malloc((n-start)*sizeof(char));
     strcpy((*HC)[i],&cd[start]); 
  } 
} 而且是感到困难重重。

Answer 10

要把如上代码变成pascal真要费点劲～～
你应该把类型和变量的声明一起给大家～～
谁知道你的HT、HC是怎么样的～～
不能调试代码，给你的结果估计也不会是正确的～～全当up～～

Answer 11

源程序是这样的：
#include"stdio.h" 
#include"stdlib.h"
#include"string.h"typedef char ElemType; 
typedef struct
{ 
   ElemType elem;
   unsigned int m_weight; 
   unsigned int parent,lchild,rchild; 
}HTNode,*HuffmanTree; typedef char** HuffmanCode; 
typedef int Status; 
typedef struct weight
{
  char elem; 
  unsigned int m_weight; 
}Weight; // save the information of the symbolizes; void HuffmanCoding(HuffmanTree *,HuffmanCode *,Weight *,int); 
void Select(HuffmanTree,int,int *,int *); 
void OutputHuffmanCode(HuffmanTree,HuffmanCode,int); Status main(void) 
{ 
  HuffmanTree HT; 
  HuffmanCode HC; 
  Weight *w; 
  char c;     // the symbolizes;
  int i,n;      // the number of elements; 
  int wei;    // the weight of a element;   printf("input the tatol number of the Huffman Tree:" ); 
  scanf("%d",&n); 
  w=(Weight *)malloc(n*sizeof(Weight)); 
  for(i=0;i<n;i++)
  { 
    printf("input the element & its weight:"); 
    scanf("%1s%d",&c,&wei); 
    w[i].elem=c; 
    w[i].m_weight=wei; 
  }   HuffmanCoding(&HT,&HC,w,n); 
  OutputHuffmanCode(HT,HC,n); 
  return 1; } void HuffmanCoding(HuffmanTree *HT,HuffmanCode *HC,Weight *w,int n)
{ 
  int i,m,s1,s2,start,c,f; 
  char *cd; 
  HuffmanTree p; 
  if(n<=1)
  return;   m=2*n-1; 
  (*HT)=(HuffmanTree)malloc((m+1)*sizeof(HTNode));
  for(i=1;i<=n;++i)
  { 
     (*HT)[i].elem=w[i-1].elem; 
     (*HT)[i].m_weight=w[i-1].m_weight; 
     (*HT)[i].parent=(*HT)[i].lchild=(*HT)[i].rchild=0; 
  }   for(;i<=m;++i)
  { 
    (*HT)[i].elem='0'; 
    (*HT)[i].m_weight=(*HT)[i].parent=(*HT)[i].lchild=(*HT)[i].rchild=0; 
  }   for(i=n+1;i<=m;++i)
  { 
    Select(*HT,i-1,&s1,&s2); 
    (*HT)[s1].parent=i;(*HT)[s2].parent=i; 
    (*HT)[i].lchild=s1;(*HT)[i].rchild=s2; 
    (*HT)[i].m_weight=(*HT)[s1].m_weight+(*HT)[s2].m_weight; 
  }   (*HC)=(HuffmanCode)malloc(n*sizeof(char*)); 
  cd=(char *)malloc(n*sizeof(char)); 
  cd[n-1]='\0'; 
  for(i=1;i<=n;++i)
  { 
     start=n-1; 
     for(c=i,f=(*HT)[i].parent;f!=0;c=f,f=(*HT)[f].parent)
 { 
       if((*HT)[f].lchild==c) cd[--start]='0'; 
       else cd[--start]='1'; 
     }      (*HC)[i]=(char *)malloc((n-start)*sizeof(char));
     strcpy((*HC)[i],&cd[start]); 
  } 
} void Select(HuffmanTree HT,int n,int *s1,int *s2) 
{ 
  int i; 
  (*s1)=(*s2)=0; 
  for(i=1;i<=n;i++)
  { 
    if(HT[i].m_weight<HT[(*s2)].m_weight&&HT[i].parent==0&&(*s2)!=0)
{ 
      if(HT[i].m_weight<HT[(*s1)].m_weight)
  { 
  (*s2)=(*s1); 
  (*s1)=i; 
      } 
      else (*s2)=i;     }     if(((*s1)==0||(*s2)==0)&&HT[i].parent==0)
{ 
      if((*s1)==0) (*s1)=i; 
      else if((*s2)==0)
  { 
  if(HT[i].m_weight<HT[(*s1)].m_weight)
  { 
  (*s2)=(*s1); 
  (*s1)=i; 
  } 
  else (*s2)=i; 
      } // end of else if 
    } // end of if 
  } // end of for   if((*s1)>(*s2))
  { 
    i=(*s1); 
(*s1)=(*s2); 
(*s2)=i; 
  } 
  return; 
} void OutputHuffmanCode(HuffmanTree HT,HuffmanCode HC,int n) 
{ 
  int i; 
  printf("\nnumber---element---weight---huffman code\n"); 
  for(i=1;i<=n;i++) 
    printf("  %d        %c         %d        %s\n",i,HT[i].elem,HT[i].m_weight,HC[i]); 
}    如果实在不行，我也只有放弃了