Модуль в паскале

Есть процедура на Pascal (посчитует суму в кажой строке матрицы)
uses crt;
var a:byte;
//-------Процедура-------\
procedure Sum(s:integer);
var i,j,n,m:byte;
a:array[1..10,1..10] of integer;
begin
For i:=1 to 10 do
Begin
For j:=1 to 10 do
Begin
a[i,j]:=random(100);
write(a[i,j]:4);
End;
writeln;
End;
For i:=1 to 10 do
Begin
s:=0;
For j:=1 to 10 do
if j mod 2 = 0 then s:=s+a[i,j];
writeln('Сумма в ',i,' строке = ',s);
End;
readln;
End;
//-------Программма-----\
begin
textcolor(Yellow);
Sum(a);
end.
Как написать ее с помощью модуля и поключить к программе?
06 февраля 2017 в 18:19
Ближайшие курсы

Как начать свой путь в разработке?
Онлайн-курс
7
марта
Как работает криптосфера
Онлайн-курс
7
марта
Как стать iOS-разработчиком?
Онлайн-курс
7
марта
Новые статьи

Что такое MVP и как к нему подступиться
48700

Обновляем программу обучения для менеджеров по продажам
32600

BI-системы: что это и зачем они нужны бизнесу
56500