c sürücüsünde 100 adet reel sayı içeren ree.dat isminde bir binary dosya bulunmaktadır.Bu dosyadaki sayıları görüntüleyen pascal programını yazınız...
cevap:
program ornek;
type
rd=file of real;
var
d:rd;
i:integer;
r:real;
begin
assign(d,'c:\reel..dat');
reset(d);
for i:=1 to 100 do
begin
read(d,r);
writeln(r);
end;
close(d);
end.
kodlama bana aittir.alıntı değildir...
cevap:
program ornek;
type
rd=file of real;
var
d:rd;
i:integer;
r:real;
begin
assign(d,'c:\reel..dat');
reset(d);
for i:=1 to 100 do
begin
read(d,r);
writeln(r);
end;
close(d);
end.
kodlama bana aittir.alıntı değildir...
Son düzenleme: