Datuve :: Forums :: Arhīvs :: Turbo pascal skaitļu nolasīšana.

Datuve

Mana Datuve

Reģistrācija | Noteikumi | Paroles atjaunošana



Forums

Ieskaties


Raksti

Lietotāji online

Lietotāji online: 96

Reģistrētie lietotāji online: 0

Viesi online: 96

Datuve.lv video
Top.LV

Turbo pascal skaitļu nolasīšana.

Ievietoja: zintis4 @ 2010.10.16 20:22  

Programmas uzdevums ir nolasīt no faila šādus skaitļus:
5 2
3
4
2
2
2

Kā lai es nolasu 5 3 4 2 2 2 vienā mainīgajā.

Komentāri:

#1 Eric @ 2010.10.16 23:41

var f:file;
buf:array[1..255]  of byte;
begin

assign(f,'fails');
reset(f,sizeof(byte));
blockread(f,buf,sizeof(buf));

close(f);
end.

šis nolasīs visus visus simbolus (max 255) vienā mainīgajā