Viết chương trình nhập vào 2 số nguyên a, b. Vẽ hình chữ nhật được tạo bởi số lượng "*" là số a, b vừa nhập. (Pascal)
Vd: Nhập vào a=9, b=5
2 câu trả lời
Var a,j,i,b:longint;
Begin
read(a,b);
For i:=1 to a do
Begin
For j:=1 to b-1 do write('* ');
Writeln('*');
End;
Readln;
End.
Program baitap;
Uses crt;
Var a,b,i,z:integer;
Begin
Clrscr;
Write('a='); Readln(a);
Write('b='); Readln(b);
For i:=1 to b do
Begin
For z:=1 to a-1 do write('*');
Writeln('*');
End;
Readln
End.
Câu hỏi trong lớp
Xem thêm
