Nhập n và xuất các dấu sao có dạng sau a) vd n=4 x xx xxx xxxx

2 câu trả lời

bạn tham khảo nhé.

Mình sẽ 2 vòng lập để làm bài này:

Program inx;

uses crt;

Var n, i, j : integer;

BEGIN

clrscr;

Write('N = ');Readln(n);

i:=1;
j:=1;

While i <= n do
begin
    while j <= i do;
    begin
    Write('x');
    j:=j+1;
    end;
    writeln;
    i:=i+1;
end;

readln;
END.