FOR DOWNTO DO pada PASCAL

Var I,j,n di deklarasikan sebagai integer

For I = n downto 1 do melakukan perulangan sebesar nilai n ketika diinput dan setiap perulangan nya nilai n dikurangi 1

For J = I to n melakukan perulangan sebesar n

Write j mencetak nilai J Pada saat perulangan tersebut


Pada saat meng-input angka 6 maka hasil outputnya :