... TY BI 18 V D V CCH VIT V S DNG CHNG TRèNH CON ẹaởng Hửừu Hoaứng CU TRC CA TH TC a) V D V TH TC Lp chng trỡnh v cỏc hỡnh ch nht bng du * cú kớch thc khỏc Hóy vit mt th tc Ve_ HCN bng du * vi chiu ... Write( ); Writeln(*) end; V cnh di For i:=1 to chdai write(*); Writeln; Program vidu; Uses crt; var a,b: byte; Procedure Ve_ HCN( chdai,chrong:integer); Var i,j: integer; Begin For i:=1 to chdai write( ... ); writeln; end; Begin CLRSCR; Ve_ HCN(25,10); Writeln; a:=5 ; b:=10; Ve_ HCN(a,b); readln; End Cu trỳc ca th tc ? CCH VIT V S DNG TH TC b) CU TRC CA TH TC Procedure[(...