Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.14;
Скачать: CL | DM;

Вниз

Вот, сваял на скорую руку. Отведайте...   Найти похожие ветки 

 
PVOzerski ©   (2003-07-26 11:18) [80]

2Marser © (26.07.03 10:06)
Если еще не сообразил:
указатель там на строку будет, а не содержимое строки. Вот был бы файл text, тогда было бы Hello.


 
Marser ©   (2003-07-28 00:01) [81]


> PVOzerski © (26.07.03 11:18)

Уже сообразил, спасибо :-)


 
pasha_golub ©   (2003-07-28 11:14) [82]

2PVOzerski

Хороший вопрос. Спасибо. Правда пару описок нашел

var
f:file of pChar;
s:pChar="Hello!";
begin
assign file(f,"!!!!");
rewrite(f);
write(f,s);
close file(f);
end.


 
Юрий Зотов ©   (2003-07-28 11:22) [83]

> pasha_golub © (28.07.03 11:14)

Это не описки. Это Паскаль. Зависит от контекста кода.


 
pasha_golub ©   (2003-07-28 11:31) [84]

2Юрий Зотов

Эт я в курсе, но я имел в виду Object Pascal. А такими функциями и сам пользовался, помню. А когда на Делфи переходил то долго не мог понять почему компилятор ругается, и зайдя в хелп был поражен до глубины души :-)


 
Юрий Зотов ©   (2003-07-28 11:53) [85]

> pasha_golub © (28.07.03 11:31)
> почему компилятор ругается

Он и не думает ругаться. Все прекрасно компилируется. Обратите внимание, что после END стоит ТОЧКА.

В ней все и дело. Она и указывает на контекст кода.
:о)


 
Marser ©   (2003-07-28 11:53) [86]


> Эт я в курсе, но я имел в виду Object Pascal. А такими функциями
> и сам пользовался, помню. А когда на Делфи переходил то
> долго не мог понять почему компилятор ругается, и зайдя
> в хелп был поражен до глубины души :-)

В "Орешнике" есть примеры таких удивлений :-)


 
pasha_golub ©   (2003-07-28 12:06) [87]

2Юрий Зотов
Сдаюсь :-)
ЗЫ Но в вопросе все-таки исправлю :-)


 
Карелин Артем ©   (2003-07-28 12:16) [88]

А каков максимум у теста?


 
pasha_golub ©   (2003-07-28 12:31) [89]

2Карелин Артем

47, но система подсчета явно далека от идеала. Думаю над этим. Если есть предложения, милости прошу.


 
Карелин Артем ©   (2003-07-28 13:46) [90]

Это как же я больше максимума на 2 очка заделал??? Непонятно.

А предложение такое: перемешивать порядок ответов. А то я после 2 раза не глядя галочки ставить начал.


 
pasha_golub ©   (2003-07-28 13:56) [91]

2Карелин Артем

Дельное предложение. Спасибо. А с другой стороны в базе всего лишь 33 вопроса пока.


 
Карелин Артем ©   (2003-07-28 15:49) [92]

А в чем суть вопроса?
try
try
ProcA;
except
on E: Exception do
begin
ProcB;
raise;
end;
on E: EOutOfResources do
ProcC
else
ProcD;
end;


--------------------------------------------------------------------------------

1) ProcB, ProcF, ProcG
2) ProcC, ProcE, ProcF, ProcG
3) ProcB, ProcF
4) Нет правильного ответа


 
pasha_golub ©   (2003-07-29 10:54) [93]

2 Карелин Артем

Новый недочет. У меня поле вопроса размером 255 символов. Обрезало нафиг :-( Буду решать


 
Calm ©   (2003-07-29 16:22) [94]

Исходный текст хорошо бы выводить с отступами, а то сидишь и на бумажке пишиешь, чтобы понять чего там за код.

А так все круто.


 
ZZ ©   (2003-07-29 17:43) [95]

Товарищ Andrey набрал 74 очков
Ну как я сдал? Неплохо? :)))


 
Mike1 Kouzmine1   (2003-07-29 17:49) [96]

А я набрал 2 очка. Правда, отмечал наугад.


 
pasha_golub ©   (2003-07-30 12:09) [97]

2ZZ

А как это ты?


 
Anatoly Podgoretsky ©   (2003-07-30 12:29) [98]

Mike1 Kouzmine1 (29.07.03 17:49)
А надо не наугад, а брать все первые (вторые и т.д.) варианты, всяко больше будет.


 
pasha_golub ©   (2003-07-30 12:35) [99]

2Anatoly Podgoretsky

А какими методами можно понизить "угадываемость"?


 
Mike1 Kouzmine1   (2003-07-30 12:40) [100]

Anatoly Podgoretsky © (30.07.03 12:29) Попробую.


 
ZZ ©   (2003-07-30 13:30) [101]

pasha_golub
А как это ты?
Оооочень просто :)) написать здесь?


 
pasha_golub ©   (2003-07-30 14:31) [102]

2ZZ

Напиши, а лучше на мыло :-)



Страницы: 1 2 3 вся ветка

Текущий архив: 2003.08.14;
Скачать: CL | DM;

Наверх




Память: 0.64 MB
Время: 0.02 c
14-45005
PsoFT
2003-07-29 12:26
2003.08.14
Привет !


14-45003
EugeneX
2002-12-05 11:29
2003.08.14
TBitmap.Palette а как это реализовать для pBitmap?


14-44968
Asteroid
2003-07-28 02:23
2003.08.14
О спаме


14-45028
default
2003-07-28 18:05
2003.08.14
CRC


14-45143
IT-Master
2003-07-30 23:47
2003.08.14
Помощь в тестировании