dùng câu lênh for...do viết chương trình vẽ liên tiếp 3 tam giác đều. MỌI NGƯỜI GIÚP EM VỚI Ạ!
2 câu trả lời
uses crt;
var i:byte;
begin
clrscr;
for i:=1 to 3 do
begin
writeln(' * ');
writeln(' * * * ');
writeln(' * * * * * ');
writeln('* * * * * * *');
end;
readln
end.
Program Hotboy ;
Uses crt;
Var i:byte;
Begin
Clrscr;
For i:=1 to 3 do
Begin
Writeln(' * ');
Writeln(' * * ');
Writeln(' * * * ');
End;
Readln
End.
Câu hỏi trong lớp
Xem thêm