Модуль

Pascal, Delphi, Lazarus Pascal
#1

Здравствуйте. У меня задание, создать модуль в который записать в качестве подпрограмм ввод, сохранение, открытие, закрытие, текстовых, типизированных и нетипизированных файлов.

Я не умею модули создавать, кто-нибудь может помочь с объяснениями или где это можно понятным языком почитать?

#2

Модули в Pascal это как включения в C и C++.
Как реализовать

без модулей, знаете?

#3

Может зависеть от варианта Паскаля, но вообще что-то типа просто создать файл с unit имя; в начале и со всеми этими функциями, потом в основном файле uses имя;

#4

Да.

#5

Что Да ?
Вот посмотрите пример: Модули Pascal

#6 
var
  t: text;
  s: string;
  n,i: integer;
begin
  assign (t, input.txt');
  rewrite (t);
  write('Введите количество строк');
  readln(n);
  for i := 1 to n do begin
    writeln('Введите ', i, ' строку');
    readln(s);
    Println(t, s);
  end;
  close(t);
  begin
    reset(t);
    writeln;
    writeln;
    writeln;
    writeln('Текст с файла:');
    while not eof(t) do begin
    readln(t,s);
    writeln(s);
  end;
    close(t);
  end;
end.

var
 f: file of real;
 m: array [1..1000] of real;
 n,i: integer;
 a: real;
begin
  a := 0;
  assign (f, massiv.dat');
  rewrite(f);
  writeln('Введите количество элементов');
  readln(n);
  for i:= 1 to n do begin
    writeln('Введите ', i, ' элемент');
    readln(m[i]);
    write(f, m[i]);
  end;
  close(f);
  reset(f);
  while not eof(f) do begin
    read(f, m[i]);
    a := a + m[i];
  end;
  writeln;
  writeln;
  writeln;
  writeln('Сумма элементов массива = ', a);
  close(f);
end.

На основе вот этого нужно модуль создать

#7

Ссылка выше, описано как реализованы модули и как их вызывать(подключать).

#8

Спасибо

#9

Дополнительно: Модульное программирование