Bilgi Kopyalama [PascaL]

[ALpMontana]

Bir dosyada yer alan bilginin kopyalanarak yeni bir dosyaya yazılması
program kopyala;

uses crt;
var
d1,d2:text;
r1,r2:string;

begin
assign(d1,'1.txt'); {bilgilerin okunacağı dosya değiştirilebilir}
reset(d1);
readln(d1,r1);
close(d1);
assign(d2,'2.txt'); {bilgilerin yazılacağı dosya}
rewrite(d2);
write(d2,r1);
close(d2);
end.

Not: Bilgilerin okunacağı dosya yani 1.txt ilgili dizinde yer alması gerekir. aksi halde program çalışmaz​

 

[er71]

birsey anlamadim biraz daha acik ek bilgi vermeniz mumkunmu ben sadece TEZ icin programdaki bilgileri alip biraz daha gelistirerek sunmam lazim
saygilar

 

[mehmet2093]

valla hiç bişey anlamadım ki biraz daha açıklık getirirseniz sevinirim ...!!!kolay gelsin

 

[Fatih Hoca]

valla hiç bişey anlamadım ki biraz daha açıklık getirirseniz sevinirim ...!!!kolay gelsin

Konuları güncellemekteki amacını da biz anlamadık, açıklık getirirsen seviniriz !

 

[yyildirayy]

biz kopyala yapıştır yapalım

 

[WaTcHFuL]

Hııı. Ben bu dili öğrenemedim :hhsigara

Daha açıklayıcı olurmusun arkadaşım