FreePascal.ru

Помогите пожалуйста составить программу, чтобы числа выводились в виде такой таблицы, если не трудно с объяснениями что к чему:
0
1 0
2 1 0
3 2 1 0
4 3 2 1 0

объяснять в принципе нечего.
var i,n:integer;
begin
n:=0;
while n<5 do begin
for i&#58;=n downto 0 do
write(i,' ');
writeln ...

Помогите пожалуйста составить программу, чтобы числа выводились в виде такой таблицы, если не трудно с объяснениями что к чему:
0
1 0
2 1 0
3 2 1 0
4 3 2 1 0