Помощь с некоторыми заданиями. На знание file

[LancerRiker]

Здравствуйте ребят. Помогите пожалуйста с заданиями,уже не знаю что делать. Гугл не помогает

1. Пусть текстовый файл t разбит на непустые строки. Написать программу, использующую функцию count(t) для подсчета числа строк, которые начинаются и оканчиваются одной и той же литерой.
2. Разработать программу для обработки данных типизированного файла. Обработка данных должна включать процедуры без параметров:
для вывода шапки таблицы;
для вывода данных одной записи;
для создания файла;
для дополнения файла новыми записями;
для записи данных в файл;
для чтения данных файла;
для модификации ряда записей файла;
для поиска записей файла с выводом найденных записей или сообщения о неуспешном поиске по поисковому признаку;
удаления записей из типизированного файла следующим образом: поиск удаляемой записи; сдвиг (в случае успешного поиска) всех записей, расположенных после удаляемой записи, к началу файла; после удаления производится усечение файла.
Структура файла:
Города
Наименование Количество
жителей Площадь,
Кв. км Год основания Количество школ
Поисковые признаки: город с количеством жителей не менее 1 млн.; год основания до 1900 года.
3. Имеется нетипизированный файл длиной 50 байт. Вывести его содержимое на экран. Скопировать его содержимое в другой файл с помощью оператора FOR..TO..DO. Длина блоков 10 байтов. В цикле выводить содержимое каждого скопированного блока

3ию вот так сделал. Но он на турбо паскале сделан, а надо на Pascal ABC NET . Ошибку выдает на blockread blockwrite. Помогите

uses
  crt;

var
  inp, out: file;
  s: string;
  i, j, k, n, tmp: integer;

begin
  clrscr;
  write('Enter filename: ');
  readln(s);
  assign(inp, s);
  reset(inp);
  assign(out, 'output.txt');
  rewrite(out);
  j := 1;
  for i := 1 to filesize(inp) div 2 do
  begin
    blockread(inp, tmp, 10, j);
    write(tmp);
    blockwrite(out, tmp, 10, j);
    readln;
  end;
  close(inp);
  close(out);
  writeln('нажмите любую клавишу для выхода');
  readln;
end.

[Stilet]

Ошибку выдает на blockread blockwrite.

Наверное очень секретная ошибка...
Дай угадаю: Ты написал в имени функции "о" а надо было писать "o". Угадал?

[min@y™]

Гугл не помогает

А своим мозгом воспользоваться пробовал?
В данной задаче не нужен гугл и ваще интернеты не нужны. Такие проги можно писать на смартфоне, сидя зимой в палатке в лесу; нужен только драный учебник по паскалю 1990 года выпуска (им можно ещё и костёр развести, скрутить козью ножку, подтереться) – универсальная вещь!

[LancerRiker]

Я попросил помощи а не осуждать меня. Но все равно спасибо

[Stilet]

Я попросил помощи а не осуждать меня

А как можно помочь чем-то если никакой симптоматики не видно? Чем тебя лечить, если ты не колешься что болит?

Ошибку выдает на blockread blockwrite. Помогите

Ппц... Ты вообще представляешь насколько громадный спектр ошибок может всплывать на этих функциях? или тоже думаешь что на все программы всегда ошибка одна-единственная, и к тому же всем известная?

[min@y™]

Я попросил помощи а не осуждать меня. Но все равно спасибо

ну покажи ошибку-то, емаё! ну нет тут телепатов!

[xatabich]

По идее начать надо с того что сесть и порисовать структуру типизированного файла после чего его нужно создать и потом по процедурно писать вашу программу для процедур параметров не нужно все берется и ложиться в одно место файл

[LancerRiker]

Сообщение от Stilet

А как можно помочь чем-то если никакой симптоматики не видно? Чем тебя лечить, если ты не колешься что болит?

Ппц... Ты вообще представляешь насколько громадный спектр ошибок может всплывать на этих функциях? или тоже думаешь что на все программы всегда ошибка одна-единственная, и к тому же всем известная?

неизвестный оператор. Я уже не знаю что делать,пытался сам ничего не получается

[Stilet]

неизвестный оператор.

Код скопипастил откудо-то?
Перепиши его руками, там могут затесаться русские буквы.