Witam!
Dopiero zaczynam naukę w programowaniu w Object Pascal i mam taki problem. Otóż chcę napisąć program który bęczie mi wyświetlał w Memo odwróconą "pół choinkę". Ma to wygladać tak:
5
12345
1234
123
12
1
Mam taki kod:
var
i: Integer;
j: Integer;
begin
for i := 0 to 6 do
for j := 1 to 6-1 do
Memo1.Lines.Add(IntToStr(j));
end;
W c++ taka zagnieżdżona pętla działa. A wygląda to tak:
void choinka (int n)
{
cout << n << endl;
for (int i = 0; i < n; i++)
{
for (int j = 1; j <= n - i; j++)
{
cout << j;
}
cout << endl;
}
}
Gdzie mam bład? Proszę o pomoc :)
Pozdrawiam :)