Создание собственного Unita

[Klik_1602]

Помогите решить задачу в которой нужно использовать собственный юнит: Дана матрица A порядка n. Удалите строки, содержащие нулевые элементы.

[Klik_1602]

или хотя бы подкиньте текст программки (язык Паскаль)

[Ghost of Night]

А свои наработки будут?

[Nastysha]

Модули имеют расширение .inc Создаешь программку которая удаляет нулевые строки и сохрани с этим расширением... Потом когда пишешь основную программу просто подключаешь свой модуль.

{$n+}
Unit step;
interface
type
float=extended;
function tr(x:float):float;
var a: float;
t,s: float;
implementation
function tr(x: float): float;
var i:integer;
begin
t:=1;
for i:=1 to 3 do
t:=t*x; tr:=t; end;
begin
end.

Это пример модуля. Попробуй переделать под свои значения. И сохрани .inc.

[Пепел Феникса]

Модули имеют расширение .inc

вообще то *.pas
*.inc это инклюдники(включаемые файлы, в паскале не приняты хотя возможность обычно есть)