cần giúp tin học 11!!!!HELP ME !!!

[hjhjngon]

các bác giải dùm em bài này với

Sử dụng vòng lặp for-do in ra màn hình tam giác với các kí tự * như sau:

*
**
***
****
*****

các bác giúp e với, e cần gấp lắm

[thecuong064]

In cố định hay là nhập vào số dòng rồi in vậy

[thecuong064]

Nhập số dòng rồi in:

USES crt;
VAR n,i,j:INTEGER;
BEGIN
    write('Nhap so dong: '); readln(n);
    for i:= 1 to n do
    begin
    for j:= 1 to i do
    write('*');
    writeln;
    end;
readln;
END.

[thecuong064]

In cố định 5 dòng cũng tương tự

USES crt; 
VAR i,j:INTEGER; 
BEGIN 
for i:= 1 to 5 do 
begin 
for j:= 1 to i do 
write('*'); 
writeln; 
end; 
readln;
 END.