viết phương trình (VCT) xuất ra màn hình hình tam giác vuông dạng * help meeeeeee

1 câu trả lời

Có nhập vào độ dài:

uses crt;
var x,i,j:longint;
begin
clrscr;
   write('Nhap do canh mot canh goc vuong: ');readln(x);
   for i:=1 to x do 
      begin 
         for j:=1 to i do write('*');
         writeln;
      end;
readln
end.

Không nhập vào độ dài:

uses crt;
var i,j:longint;
begin
clrscr;
   for i:=1 to 5 do 
      begin 
         for j:=1 to i do write('*');
         writeln;
      end;
readln
end.

Câu hỏi trong lớp Xem thêm