Candyxjo
Пользователь
- Регистрация
- 14/1/13
- Сообщения
- 224
Имею такое: файл s в котором есть :
4321
1234
потом есть 2 файл в котором:
1234
2323
нужно сравнить эти 2 файликов ну и выдать дубликат
я начал так:
while not EOF(f) do
begin
readln(f, buf);
if (pos(s,buf)0) then
begin
inc(dublicat_c);
sincdublicatbfile;
end else
begin
inc(nodublicat_c);
sincnodublicatfile;
end;
но не работает (
помогите решить
4321
1234
потом есть 2 файл в котором:
1234
2323
нужно сравнить эти 2 файликов ну и выдать дубликат
я начал так:
while not EOF(f) do
begin
readln(f, buf);
if (pos(s,buf)0) then
begin
inc(dublicat_c);
sincdublicatbfile;
end else
begin
inc(nodublicat_c);
sincnodublicatfile;
end;
но не работает (
помогите решить
