Mn giúp mình với mình không biết viết pascal? Viết chương trình vẽ hình chữ nhật và điền dấu sau như sau ***** ***** *****
2 câu trả lời
Program vd;
Var i,j : integer;
Begin
Clrscr;
Write (nhap * );
Readln(*);
If (hinhchunhat,*=,);
End.
var i,j: integer;
begin
for i:= 1 to 3 do
begin
for j:= 1 to 5 do
write(‘*’);
writeln;
end;
end.
