Z delphi na pascal'a (IntToStr)

[paszczpysc]

Witam na informatyce pisałem program w delphi i mam prośbę taką, aby mi ktoś powiedział co trzeba pozmieniać, żeby otworzyć go turbo pascalu.
Bardzo proszę o odpowiedź.
program Project2;

{$APPTYPE CONSOLE} {to na pewno do usunięcia}

uses
SysUtils;{ to raczej też}
var
p, p1:text;
i:integer;
s:string;

begin
assign (p,'dane.txt');
assign (p1,'wyniki.txt');
reset (p);
rewrite(p1);
i:=1;
while not eof(p) do
begin
readln(p,s);
s:=intToStr(i)+'.'+s; {a co z tym?}
writeln (p1, s);
i:=i+1
end;
close(p);
close(p1);
end.

[Crank]

Generalnie twój kod trzyma się kupy, usuń tylko

 {$APPTYPE CONSOLE} {to na pewno do usunięcia}

i po sprawie.
Ciekaw jestem dlaczego pytasz skoro sam znasz już odpowiedz.

[paszczpysc]

no właśnie jest problem z tym

s:=intToStr(i)+'.'+s;

czy to da się zmienić, juz tak kombinowałem, że mętlik mi się zrobił :mrgreen:

[BABCIA ADHD]

W pascal'u jest funkcja Str :

var
  i: integer;
  s: string; 
begin
 
   i:=15;
   Str(i,s);
   writeln(s);    {Wypisze 15}