c code nach delphui übersetzen

[Klaus-B.Schmidt]

hallo,
ich hab eine frage oder auch ein problem, und den einzigen ausweg, den ich sehe ist, diese
beiden c codes in die delphi sprache umzussetzen, sodass man sie in programmen verwenden kann.
da iuch eine ahnuzng von habe, frage ich euch
-----------------------
code 1
-----------------------

Code:

include <stdio.h>
int main()
{
// convert text file to plp
char c;
c = getchar(); 
while(!feof(stdin)){
putchar(c); // copy char to output
putchar('\0'); // append zero after each char
c = getchar();
}
}

-----------------------
code 2
-----------------------

CODE

Code:

#include <stdio.h>
int main()
{
// convert plp file to text
char c;
c = getchar();
while(!feof(stdin)) {
if(c!='\0') // filter zeros
putchar(c);
c = getchar();
}
}

besten dank für eure bemühungen .

MfG
Klaus

[edit=alcaeus]Code-Tags eingefügt. Beim nächsten Mal bitte selbst machen. Danke Mfg, alcaeus[/edit]