<span><em>Caps Lock,</em></span><span><em>Shift</em></span>
1. Потеря брата
2. Печка и ржаные пирожки
3. Лесная яблонька
4. Молочная река, кисельные берега.
5. Избушка Бабы Яги
<span>6. Возвращение домой</span>
Var i, n, j: integer;
begin
write('Введите n ');
readln(n);
if (n>=1) and (n<=100) then
for i:=1 to n do
begin
for j:=1 to i do
write('*');
writeln;
end;
<span>end.</span>
Н = 2,3 .................. это просто чтоб ответ защитало точки тоесть