Модульное программирование в Турбо Паскале. Бакланов М.В - 4 стр.

UptoLike

Составители: 

- 4 -
Fh^mev *5$3+ h[t_^bgy_l fgh]hqbke_ggu_ ijh]jZffgu_ kj_^kl\Z
mijZ\e_gby ]jZnbq_kdbf j_`bfhf jZ[hlu ^bkie_yh[_ki_qb\Z_l bkihevah\Zgb_
\k_o \hafh`ghkl_c gZb[he__ jZkijhkljZgzgguo lbih\ ^bkie__\ KGA, EGA, VGA,
HERCULES).
Fh^meb TURBO3, *5$3+ h[_ki_qb\Zxl kh\f_klbfhklv ^Zgghc \_jkbb k
[he__jZggbfb\_jkbyfb
3. H[sZykljmdlmjZfh^mey
Kljmdlm jgh fh^mev bf__l aZ]heh\hd b jZa^_ezg gZ ^\_ qZklb bgl_jn_ck
(InterfDkH b j_ZebaZpby ,PSOHPHQWDWLRQ H[ty\e_gby mdZaZggu_ \ bgl_jn_ck_
y\eyxlky^hklmigufb^eyex[hcijh]jZffubkihevamxs_cwlhlfh^mevIhwlhfm
bgl_jn_ck gZau\Z_lky hldjulhc qZklvx <qZklbj_ZebaZpbbihf_sZxlky h[t_dlu
g_\b^bfu_bebkdjulu_
Fh^mev\yaud_Turbo Pascal bf__lke_^mxsbc\b^
Unit
< >;
Interfase
)
Uses
< >;
{ }
Implementation
Uses
< >;
{ }
begin
{
end.
Kibkhdfh^me_cbgl_jn_ckghcqZklbkh^_j`blbf_gZfh^me_c bkihevam_fuo
\ ^Zgghf fh^me_ beb \ \uau\Zxs_c ijh]jZff_ <uau\ZxsZy ijh]jZffZ fh`_l
bkihevah\Zlv wlb fh^mebh[jZlb\rbkv d gbf k ihfhsvx uses <bfy>, lZd`_ dZd
_keb[uhgb[uebhibkZgu\kZfhcijh]jZff_<k_\ua\Zggu_\_ebqbguy\eyxlky
^ey\ua u\Zxs_cijh]jZffu]eh[Zevgufb
Kibkhd fh^me_c \ jZa^_e_ j_ZebaZpbb ^_eZ_l ^hklmigufb khhl\_lkl\mxsb_
fh^meblhevdh \jZa^_e_ j_ZebaZpbb^Zggh]hfh^meyJZa^_e,PSOHPHQWDWLRQfh`_l
kh^_j`Zlv bgbpbZebabjmxsm x qZklv HgZ \ qZklghklb ij_^gZagZq_gZ ^e y
mklZgh\dbgZqZevguoagZq_gbci_j_f_gguffh^mey<kemqZ_hlkmlkl\byhi_jZlhjh\
wlZqZklvkhklhblbaaZ\_jrZxs_]hfh^me vend.
                                         -4-
       Fh^mev *5$3+ h[t_^bgy_l fgh]hqbke_ggu_ ijh]jZffgu_ kj_^kl\Z
mijZ\e_gby ]jZnbq_kdbf j_`bfhf jZ[hlu ^bkie_y h[_ki_qb\Z_l bkihevah\Zgb_
\k_o \hafh`ghkl_c gZb[he__ jZkijhkljZgzgguo lbih\ ^bkie__\ KGA, EGA, VGA,
HERCULES).
       Fh^meb TURBO3, *5$3+ h[_ki_qb\Zxl kh\f_klbfhklv ^Zgghc \_jkbb k
[he__jZggbfb\_jkbyfb


                           3. H[sZykljmdlmjZfh^mey

       Kljmdlmjgh fh^mev bf__l aZ]heh\hd b jZa^_ezg gZ ^\_ qZklb bgl_jn_ck
(InterfDkH   b j_ZebaZpby ,PSOHPHQWDWLRQ  H[ty\e_gby mdZaZggu_ \ bgl_jn_ck_
y\eyxlky^hklmigufb^eyex[hcijh]jZffubkihevamxs_cwlhlfh^mevIhwlhfm
bgl_jn_ck gZau\Z_lky hldjulhc qZklvx < qZklb j_ZebaZpbb ihf_sZxlky h[t_dlu
g_\b^bfu_ bebkdjulu_ 
       Fh^mev\yaud_Turbo Pascal bf__lke_^mxsbc\b^

            Unit < bfy >;
              Interfase                     hldjulZy qZklv             bgl_jn_ck)
                Uses < kibkhd bfzg fh^me_c >;

                { h[sb_ h[ty\e_gby }

              Implementation                kdjulZy qZklv j_ZebaZpby
                Uses < kibkhd bfzg fh^me_c >;

                { ehdZevgu_ h[ty\e_gby }
                ^ ijhp_^mju b nmgdpbb       `
            begin
              { hi_jZlhju `                      bgbpbZebaZpby
            end.

      Kibkhdfh^me_cbgl_jn_ckghcqZklbkh^_j`blbf_gZfh^me_cbkihevam_fuo
\ ^Zgghf fh^me_ beb \ \uau\Zxs_c ijh]jZff_ , lZd`_ dZd
_keb[uhgb[uebhibkZgu\kZfhcijh]jZff_