c1 : Viết chương trình sử dụng chương trình con in ra màn hình hình chữ nhật với chiều dài và chiều rộng được nhập từ bàn phím c2 : viết chương trình sử dụng chương trình con in ra màn hình ba hình chữ nhật liên tiếp với 3 hình có kích thước gấp đôi hình trước ?

1 câu trả lời

Program FNG;
Uses crt;
Var a,b: longint;

Procedure xuli;
Var i,j: longint;
Begin
        For i:=1 to a do
        Begin
                For j:=1 to b do Write('*');
                Writeln;
        End;
End;

Begin
        Clrscr;
        Write('Nhap a va b: '); Readln(a,b);
        Xuli;
        Readln
End.