задачи по файлам Pascal ABC

[(Анна)]

1. Даны два файла целых чисел. Распечатать числа, которые встречаются в первом файле, но не встречаются во втором.

2. Во всех словах текстового файла первую букву слова заменить заглавной.

3. Вывести различные русские буквы трех предложений (то есть такие, какие есть только в одном из них). Предложения хранятся в трех текстовых файлах.

[p51x]

раздел фриланса ниже

[rubius2008]

1. Исходный файл подразумевается что типизированный

reset(f1);
while not eof(f1) do begin
   read(f1,x);
   reset(f2);
   exist:=false;
   while (not eof(f2)) and (not exist) do begin
      read(f2,y);
      if x=y then exist:=true;
   end;
   if not exist then write(x,' ');
end;

[_kama_]

плиз решите

[Mad_Cat]

плиз решите

контакты в подписи)