usb-шку куплю
чего чего
Anime For You - Форум сообщества Анимешников ^__^ |
Привет, Гость! Войдите или зарегистрируйтесь.
Вы здесь » Anime For You - Форум сообщества Анимешников ^__^ » Архив - Флуд » Как прекрасен этот флуд посмотри как прекрасен этот флуд! ^__^
usb-шку куплю
чего чего
а я вот недавно (целые четыре минуты!) принимала солнечную ванну =)))
не перепринималась?)
чего чего
Не думаю что тебе нужно обьяснять что такое usb
артур как должен выглядить READ для нетипизированных файлов???
всем привет
я бы вот это посомтрел да сабов нет =(( http://www.world-art.ru/animation/animation.php?id=6114
почитать это чтоли =((
одна программа осталась
балин,нет его таня приветик
артур как должен выглядить READ для нетипизированных файлов???
привет =)
наверное read(имя файла, переменная куда будет считываться инфа из файла) очевидно с предварительными заданиями файла и ассигна на этот файл...
таня приветик
привет)
как тебе погода?
привет =)
наверное read(имя файла, переменная куда будет считываться инфа из файла) очевидно с предварительными заданиями файла и ассигна на этот файл...
нет,поэтому и спрашиваю
привет)
как тебе погода
замячательно! под град я не попала но уже который раз промокла под дождём
не перепринималась?)
ды даже мало как-то было =((
нет,поэтому и спрашиваю
хм щас посмотрю как оно в паскале)
ды даже мало как-то было =((
табличка сарказм вас не смутит)
хм щас посмотрю как оно в паскале
не надо я пока сама
табличка сарказм вас не смутит)
не понимаю, завидно тебе чтоли было? о.О хд
блин,не получается
хм щас посмотрю как оно в паскале)
а ну ясно
При работе с нетипизированными файлами могут применяться все процедуры и функции, доступные типизированным файлам, за исключением Read и write, которые заменяются соответственно высокоскоростными Процедурами BlockRead И BlockWrite:
Procedure BlockRead(var F: File; var Buf; Count: Integer [; var AmtTransferred: Integer]) ;
Procedure BlockWrite(var F: File; var Buf; Count: Integer [; var AmtTransferred: Integer]);
вот так примерно вроде работает... я хз какая у тя конкретная задача
program Project2; {$APPTYPE CONSOLE} uses SysUtils; var F: File; c: char; i: Integer; Buf: array[1..2048] of Char; begin AssignFile(F,'simple.dat'); Reset(f,1); BlockRead(f, Buf, 8); write( Copy(buf,1,8)); read(c); end.
не надо я пока сама
поздно когда я пишу я форум не читаю))
не понимаю, завидно тебе чтоли было? о.О хд
твоим 4 минутам завидовать? оО их даже на хлеб не намажешь=)))
блин,не получается
ну вот
посмотри программу выводит сотую ошибку,ничего понять не могу
13. Создать и заполнить файл f1 числами. Переписать из файла f1 в f2 числа, без повторных вхождений(нетипизированные)
uses crt; var f,g:file; n,i,k,j:integer; a:array[1..100]of integer; s,o:char; begin clrscr; randomize; writeln('1'); readln(s); assign(f,s); rewrite(f); writeln(2); readln(o); assign(g,o); rewrite(g); write('n=');readln(n); for i:=1 to n do begin a[i]:=random(10)-3; rewrite(f,a[i]{,' '}); end; blockread(f,a[i],i); i:=0; while not eof(f) do begin inc(i); blockread(f,a[i],i); k:=0; for j:=1 to i-1 do if a[i]=a[j] then k:=1; if k=0 then rewrite(g,a[i]{,' '}); end; close(f); close(g); write('Fail Chisla2 zapisan!'); readln end. close(g); end.
что это вообще бэримор?
тут плохо понятно что ты делашеь но
вот этот кусок не верный...
blockread(f,a[i],i); // что это мы читаем и зачем?
i:=0;
while not eof(f) do
begin
inc(i);
blockread(f,a[i],i); // у тебя i увеличиватся каждую итерацию т.е ты с файла сначала считала 1 байт потом 2 потом 3 итп... точно не верно
твоим 4 минутам завидовать? оО их даже на хлеб не намажешь=)))
почему же? 60 рублей как никак, а деньги о.О
почему же? 60 рублей как никак, а деньги о.О
а я думал это когда под солнышком находишься +))))
я дурак rewrite - это создание файлов а не открытие его
я дурак rewrite - это создание файлов а не открытие его
ща я сходил за мышкой =) щас отлажу твою прогу жди в лс кину
Доброго вечера.
o90
привет)
а я думал это когда под солнышком находишься +))))
значит не догнал мыслю
Вы здесь » Anime For You - Форум сообщества Анимешников ^__^ » Архив - Флуд » Как прекрасен этот флуд посмотри как прекрасен этот флуд! ^__^