viết chương trình vẽ hình chữ nhật có chiều dài, chiều rộng nhập từ bàn phím , cd,cr<100 . help me (thuộc chương trình tin 11 phần cấu trúc lặp nha) chương trình pas nha
2 câu trả lời
program oken;
uses crt;
var cd,cr,j,i: byte;
begin
clrscr;
write('Nhap chieu dai: '); readln(cd);
write('Nhap chieu rong: '); readln(cr);
for i:=1 to cr do
begin
for j:=1 to cd do
write('*');
writeln;
end;
readln;
end.
Program NhatNgu;
Uses crt;
Var cd,cr,i,j: byte;
Begin
Clrscr;
Write('Nhap chieu dai: '); Readln(cd);
Write('Nhap chieu rong: '); Readln(cr);
For i:=1 to cr do
Begin
For j:=1 to cd do
Write('*');
Writeln;
End;
Readln
End.
Câu hỏi trong lớp
Xem thêm
