Начал изучать паскаль модульной структуры и услышал такой термин как заглушки .Как я понял небольшая программа для тестирования процедур при .
Хотелось бы посмотреть какой-нибудь пример.

Драйверы и заглушки это программы, которые используют для проверки тестовых наборовданных (вобщемдл ятестирвоания).
Драйвер это программа, тестирующая какой-то модуль, (технология восходящего тестирования), то есть программа вызывает например какую-то процедуру из тестируемого модуля ипроверяет входные данные и наболр выходных.

А заглушка это программа которая служит для утановки вместо какого-то модуля (тестирование нисходящее).
Пример

uses A;
var c:byte;
begin
 readln© 
writeln(F©);
end.

модуль B

Unit B;
Interface
 function F(x:byte):byte;
implementation
 function f(x:byte):byte;
 begin
  f:=x*2;
 end;
end.

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

Unit B;
Interface
 function F(x:byte):byte;
implementation
 function f(x:byte):byte;
 begin
  writeln('подключенна заглугшка'); 
   f:=10;
 end;
end.

ТО есть она уже готовыеданные поставляет, в соотвествии стестом придуманным.
А драйвер к модулю B будет таким:

uses A;
begin
 writeln(F(5));
end.

Serega18, а где ты учишься?

МЭИ

Апо какой вы книге занимаетесь?

Просто про это очень хорошо рассказанно в книге
Майерс Г. "Искуство тестирования программ" ...

Задачник(Зубов,Котарова) и пяток методичек. и все

По ходу дела возник вопрос: у тебя в примере function а если будет procedure
от этого что-нибудь изменится?

В общем случае - нет. На процедуру точно так же можно ставить заглушку, но

uses A;
begin
 writeln(F(5));
end.

сделать это с процедурой F уже будет проблематично... ;)

А если б в модуле В было бы условие вроде этого

То в заглушке было бы так?

или останется как и было?

Да в модуле (в функции) - хоть десяток условий. Заглушка останется такой же. Условия будешь проверять, когда будешь отлаживать саму функцию, а здесь идет отладка главной программы ...

значит я сначала делаю одну заглушку для основной программы а потом еще n-ое число для всех процедур?

Когда ты переходишь к тестированию функции - делаешь заглушки для всего, что она использует, и на ИЗВЕСТНЫХ наборах данных (ведь заглушка возвращает то, что ты ей сказал вернуть) тестируешь работу этой функции...

1)В данном примере F:=10 ,а если б была матрица A[i,j] то как это записать?

Что значит "матрица"? Результат функции? Так Turbo Pascal не позволяет возвращать результаты такого типа.

Ну например в предыдущей задаче у меня была процедура(поменять местами столбец первый с indx)в результате эта процедура передавала матрицу измененную.В модульной структуре я загоняю ее в модуле В(например). В этом случае как быть?

Procedure change_rows(Var After, Before: matrix);
begin
  writeln('Заглушка');
  After := Before; { просто вернуть исходную матрицу }
end;

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

А как будет выглядеть заглушка в случае входного данного массива двумерного, а выходного - одномерного массива и флажка?

Пример функции приводи, когда что-то спрашиваешь... Я не телепат, догадываться, что имеется в виду...

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

Ты заголовок подпрограммы привести можешь? Или так и будем гадать? Откуда я знаю, КАК твоя подпрограмма должна "вывести" одномерный столбец, через параметры, или на печать через WriteLn ??

Ну, начнем с того, что F1 не возвращается в вызывающую программу, так что про нее забудь Ну, допустим вот такой вариант ЗАГЛУШКИ (ну поймите же вы, что эта вещь возвращает не то, что должно вернуться, а то, что ТЫ хочешь чтобы вернулось !!!)

Procedure Stolb(Var A:Dvum; n,m:integer; Var NoS;Fl:Boolean);
var i: integer;
begin
  writeln('Заглушка');
  for i := 1 to n - 1 do
    odin(NoS)[i] := i;
end;

P.S. Если уже даешь что-то, будь добр давать и описания типов !!! Обязательно догадываться, что скрывается за извращениями типа Dvum или odin?